Publications by gcchen
ISMS
全校導入資訊安全管理系統（ISMS）問卷調查-前測 本次問卷調查，共蒐集校內教職員工所填寫之有效問卷共計132份，茲將分析結果詳述於下: 基本資料部分 首先讀取資料： isms01 <- read.csv("isms01.csv", header=T) 讀取前五筆資料 head(isms01,5) ## 時間戳記 A1 ...
6169 sym 8 tbl
ISMS
全校導入資訊安全管理系統（ISMS）問卷調查-前測 本次問卷調查，共蒐集校內教職員工所填寫之有效問卷共計132份，茲將分析結果詳述於下: 基本資料部分 首先讀取資料： isms01 <- read.csv("isms01.csv", header=T) 讀取前五筆資料 head(isms01,5) ## 時間戳記 A1 ...
5226 sym 8 tbl
Market Basket Analysis - 購物籃分析 (關聯分析) II
關聯規則的視覺化 透過圖形的方式，可藉由視覺化方式，更直觀地顯示出關聯分析的結果。 這需要用到 R 的擴充套件 arulesViz。 此處介紹一些此套件相關的簡單應用。 首先安裝與載入 arulesViz 套件 # install.packages("arulesViz", repos="http://cran.us.r-project.org") library (arulesV...
809 sym 7 img
Market Basket Analysis - 購物籃分析 (關聯分析) I
購物籃分析又稱關聯分析，從大量的交易資料中探勘資料間具有相關性的隱藏商業規則，其中最經典的就是啤酒與尿布的例子。 以下透過 R 進行簡單範例的操作與說明。 首先安裝與載入 arule 套件 # install.packages("arules", repos="http://cran.us.r-project.org") library ( arules ) #...
3184 sym 4 img
大數據數值分析與應用-ver-202302
page-03 Example: x <- c() #務必記得一開始先歸零(放空)，以避免重複執行下， x 累積了之前的結果 for (i in 1:10000) {x<-rbind(x,sum(sample(1:6,2,rep=T))/2)} #模擬擲骰子2次的平均，做10000次，求整體平均數與變異數 mean(x) ; var(x) # 理論值是 mea...
3944 sym R (28902 sym/339 pcs) 25 img
202302-資訊數學(下)講義範例R程式碼與執行結果
## Page-01 u <- c(0,4) v <- c(3,0) w <- c(0,-2) a <- c(-2,-4) b <- c(3,0) c <- c(-6,4) (tot <- u+v+w+a+b+c) # 計算小羊從頭到尾移動的效果並印出 ## [1] -2 2 O <- c(0,0) G <- c(-2,2) (O-G) # 計算小羊如何由G點回到原點並印出 ## [1] 2 -2 D <- c(3,2) (D+tot) ...
352 sym 8 img
Drunkard’s Walk - simulation
【模擬 1：模擬醉漢走路過程(單次，紀錄位置變化與步數)】 POSITION <- 0 ; TIMES <- 0 repeat{POSITION <- POSITION + sample(c(-1,1),1);print(POSITION) ; TIMES <- TIMES + 1; if(POSITION==-1 || POSITION==2) {break}} ## [1] 1 ## [1] 2 print(TIMES) ## [1] 2 【模擬 2：模擬醉漢走路100,000次，共十回，估算醉漢�...
1013 sym R (6634 sym/59 pcs) 1 img
Law of Large Numbers (LLN)
以特定擲單個骰子的過程來展示大數法則。隨著投擲次數的增加，所有結果的平均值趨於3.5（骰子點數的期望值）。這個實驗會在投擲數量較小的時候（左部）會表現出不穩定的變化，隨著數量變得很大（右部）的時候，它們將會趨近期望值 (資料來源：維基百科)...
127 sym R (226 sym/1 pcs) 1 img
Sampling Distribution
利用R軟體模擬投擲一顆公正骰子2次，並計算平均點數，共模擬10000次，繪製模擬之抽樣分配圖如下： par(mfrow = c(1,2)) x <- c() for (i in 1:10000) {x <- rbind(x,(sample(1:6,1)+sample(1:6,1))/2)} hist(x, seq(0,7,.5), main = "size=10,000") hist(x, seq(0,7,.01), main = "size=10,000") 某不透明箱中內裝有�...
1056 sym R (1669 sym/10 pcs) 4 img
Population Variance v.s. Sample Variance
母體變異數與樣本變異數 母體變異數 \(\sigma^2 = \displaystyle{\sum_{i=1}^{N} \frac{(x_i-\mu)^2}{N}}\) 的分母是 \(N\)， 樣本變異數 \(s^2 = \displaystyle{\sum_{i=1}^{n} \frac{(x_i-\overline{x})^2}{n-1}}\) 的分母是 \(n-1\)， 既然都是平均的概念，分母所除的數字卻並非都是 “總數”，這是初學�...
1809 sym R (7997 sym/24 pcs)