iT邦幫忙

2021 iThome 鐵人賽

DAY 16
0
影片教學

R語言-分群(clustering)的實戰應用系列 第 16

[Day-16] R語言 - 分群應用(一) GMM數值補值-上 ( Fill.NA with GMM in R.Studio )

您的訂閱是我製作影片的動力
訂閱點這裡~/images/emoticon/emoticon39.gif

Yes

影片程式碼 (延續昨天)

#演算法
library(ClusterR)
opt_gmm = Optimal_Clusters_GMM(iris_no_na, max_clusters = 10, criterion = "BIC", 
                               dist_mode = "eucl_dist", plot_data = T) 
gmm = GMM(iris_no_na, 4, dist_mode = "eucl_dist", em_iter = 10)  # EM調參  
gmm_out <- as.data.frame(gmm$Log_likelihood) #大好
final <- cbind(iris_no_na,gmm_out)

final <- final %>% 
  mutate(最大=pmax(V1,V2,V3,V4)) %>% 
  mutate(分群=ifelse(最大==V1,"c1",
              ifelse(最大==V2,"c2",
              ifelse(最大==V3,"c3","c4"))))

若內容有誤,還請留言指正,謝謝您的指教/images/emoticon/emoticon07.gif


上一篇
[Day-15] R語言 - 分群應用(一) 補值前處理 ( Fill.NA with Clustering in R.Studio )
下一篇
[Day-17] R語言 - 分群應用(一) GMM數值補值-下 ( Fill.NA with GMM in R.Studio )
系列文
R語言-分群(clustering)的實戰應用30
圖片
  直播研討會
圖片
{{ item.channelVendor }} {{ item.webinarstarted }} |
{{ formatDate(item.duration) }}
直播中

尚未有邦友留言

立即登入留言