2011-09-21 121 views

回答

4

是的,在運行kmeans(....)之前立即調用set.seed(foo)將給出相同的隨機啓動,因此每次都會進行相同的羣集。 foo是種子,如42或某些其他數值。

+0

只需添加到Andrie和Gavin的迴應,我測試過,即使我們在設置'nstart'參數kmeans()大於1,即有多次隨機播種迭代,set.seed()將得到可生成的相同結果。 –

13

是的。在進行聚類之前,使用set.seed爲隨機值設置種子。

使用例如kmeans

set.seed(1) 
x <- rbind(matrix(rnorm(100, sd = 0.3), ncol = 2), 
      matrix(rnorm(100, mean = 1, sd = 0.3), ncol = 2)) 
colnames(x) <- c("x", "y") 


set.seed(2) 
XX <- kmeans(x, 2) 

set.seed(2) 
YY <- kmeans(x, 2) 

測試平等:

identical(XX, YY) 
[1] TRUE 
+1

+1爲例 –

+0

非常感謝您的幫助!請接受OP。 – slotishtype

相關問題