您的订阅是我制作影片的动力
订阅点这里~
影片程序码
library(naniar)
data(iris)
any_na(iris) #前置1: chk NA
iris <- iris[,-5]
iris <- scale(iris) #前置2: standard norm 标准化
## k-means ####
#没写大多为欧式
library(ClusterR) # WCSS 组内平方和 = SSE = SSW,WCSSE sum(WCSS)
opt_km = Optimal_Clusters_KMeans(iris, max_clusters = 10, initializer = 'random',
criterion = "WCSSE",plot_clusters = T)# random
km = KMeans_rcpp(iris, clusters = 4, num_init = 5,
max_iters = 100, initializer = 'random') # random
km$WCSS_per_cluster
km_out <- as.data.frame(km$clusters)
final <- cbind(iris,km_out)
若内容有误,还请留言指正,谢谢您的指教
<<: Day 03:专案01 - 超简单个人履历02 | HTML基本元素
Introduction to embedded system Components and app...
根据 Google 的官方消息指出在 2021 年的六月有对 SEO 的演算法稍作调整。会特别将网页...
翻转大黄蜂音效 ( 二代板 ) 教学原文参考:翻转大黄蜂音效 ( V2 ) 这篇文章是针对 micr...
记录使用者最近五次的登入时间, 资料结构规划如下 1.记录使用者的email, 也是登入的帐号 2....
此系列文章会同步发文到个人部落格,有兴趣的读者可以前往观看喔。 在 E2E 测试中,不仅有选取元素...