嘗試構建模型時出現卡住現象。 我想按年將數據集freeny分爲10個子集。如何在使用R進行聚類時正確繪製迴歸樹
data(freeny)
options(digits=2)
year<-as.integer(rownames(freeny))
freeny<-cbind(freeny,year)
freeny = freeny[sample(1:nrow(freeny),length(1:nrow(freeny))),1:ncol(freeny)]
freenyValues= freeny[,1:5]
freenyTargets=decodeClassLabels(freeny[,6])
freeny = splitForTrainingAndTest(freenyValues,freenyTargets,ratio=0.15)
km<-kmeans(freeny$inputsTrain,10,iter.max = 100, nstart = 5)
kclust=km$cluster
library(tree)
kclust=as.factor(kclust)
mdp=cbind(freeny$inputsTrain,kclust)
mdp<-data.frame(mdp)
mdp.tr=tree(kclust~.,mdp)
但結果是,樹只有5個終端nodes.It應爲10個終端節點,因爲我分成10簇通過k均值。怎麼了?
謝謝您的回答。我刪除了參數nstart,但仍然只有迴歸樹只有幾個終端節點不全。 –