Publications by gcchen
2023/11/24 sta
經驗分配函數 (Empirical Distribution function) 實務上取得之統計資料，無法確認資料之特徵與機率分佈。可先透過頻率分配 (Frequency Distribution)、累積相對頻率分配 (Cumulative Relative Frequency Distribution)、q-q plot (Quantile-Quantile Plot) 等方法進一步確認 經驗累積分配函數(Empir...
817 sym 9 img
cow
購物籃分析又稱關聯分析，從大量的交易資料中探勘資料間具有相關性的隱藏商業規則，其中最經典的就是啤酒與尿布的例子。 以下透過 R 針對台南牛肉湯之店面銷售資料進行簡單範例的操作與說明。 首先安裝與載入 arules 套件 # install.packages("arules", repos="http://cran...
3413 sym R (29772 sym/98 pcs) 9 img
cow
購物籃分析又稱關聯分析，從大量的交易資料中探勘資料間具有相關性的隱藏商業規則，其中最經典的就是啤酒與尿布的例子。 以下透過 R 針對台南牛肉湯之店面銷售資料進行簡單範例的操作與說明。 首先安裝與載入 arules 套件 # install.packages("arules", repos="http://cran...
2383 sym R (18366 sym/64 pcs) 4 img
cow
購物籃分析又稱關聯分析，從大量的交易資料中探勘資料間具有相關性的隱藏商業規則，其中最經典的就是啤酒與尿布的例子。 以下透過 R 針對台南牛肉湯之店面銷售資料進行簡單範例的操作與說明。 首先安裝與載入 arules 套件 install.packages("arules", repos="http://cran.u...
2050 sym R (15839 sym/61 pcs) 4 img
Sampling Distribution
page-52 Example: x <- c() #當持續使用相同變數(例如：x)時，務必記得一開始先歸零(放空)，以避免重複執行下， x 累積了之前的結果 for (i in 1:10000) {x<-rbind(x,sum(sample(1:6,2,rep=T))/2)} #模擬擲骰子2次的平均，做10000次，求整體平均數與變...
886 sym 20 img
R 常用指令
加減乘除 1+3 ## 一般加法 ## [1] 4 34-123 ## 一般減法 ## [1] -89 434*556 ## 一般乘法 ## [1] 241304 325/3 ## 一般除法 ## [1] 108.3333 325%/%3 ## 只取整數部分 ## [1] 108 325%%3 ## 只取餘數部分 ## [1] 1 x1<-1:25 ## 產生向量x1=(1,2,3,4,...,25) x2<-c(1:25) x1==x2 ##判斷是�...
878 sym
The Babylonian square-root algorithm
巴比倫演算法 # 以 N = 4567, x = 70 為例: options(digits=22) N <- 4567 x <- 70 y <- N/x for (i in 1:30){x <- (x+y)/2; y <- N/x; cat("i=",i,"x=",x,"y=",y,"\n")} ## i= 1 x= 67.62142857142856655628 y= 67.53776275483258473287 ## i= 2 x= 67.57959566313057564457 y= 67.57956976785553138143 ## i= 3 x= 67.57958271549304640757 y= 67.57958271...
50 sym
The Babylonian square-root algorithm
巴比倫演算法 # 以 N = 4567, x = 70 為例: options(digits=22) N <- 4567 x <- 70 y <- N/x for (i in 1:30){x <- (x+y)/2; y <- N/x; cat("i=",i,"x=",x,"y=",y,"\n")} ## i= 1 x= 67.62142857142856655628 y= 67.53776275483258473287 ## i= 2 x= 67.57959566313057564457 y= 67.57956976785553138143 ## i= 3 x= 67.57958271549304640757 y= 67.57958271...
50 sym
ISMS-01
全校導入資訊安全管理系統（ISMS）問卷調查-前測 讀取資料 isms01 <- read.csv("isms01.csv", header=T) 將資料中問卷填答欄位篩除。 head(isms01,3) ## 時間戳記 A1 A2 A3 A4 A5 ## 1 2023/7/5 上午 9:35:47 普通 同意 普通 普通 �...
5785 sym 5 img
ISMS-0820
全校導入資訊安全管理系統（ISMS）問卷調查-前測 本次問卷調查，共蒐集校內教職員工所填寫之有效問卷共計138份，茲將分析結果詳述於下: 基本資料部分 首先讀取資料： isms01 <- read.csv("isms01.csv", header=T) 讀取前五筆資料 head(isms01,5) ## 時間戳記 A1 ...
6198 sym 8 tbl