Rプログラミング：どのように3つの段階で系統樹を切るとテキスト

Question

のプロットを示すために、添付のコードを参照してください：ここでは

train <- read.csv("~/Desktop/R/2014data.csv") 
d <- dist(train, method = "euclidean") # distance matrix 
fit <- hclust(d, method="ward") 
plot(fit) 

は出力図形である：

どのようにこの樹状図を4〜5層にカットし、出力（テキスト）を表示しますか？

Answer 1

cuttree()関数を使用すると、指定された深さ、つまり4または5にツリーをトリミングできます。次に、ツリーをテキストで表示するには、単にprint(tree)を入力します。

# As you had 
train <- read.csv("~/Desktop/R/2014data.csv") 
d <- dist(train, method = "euclidean") # distance matrix 
fit <- hclust(d, method="ward") 
plot(fit) 

# trim the tree, k for number of groups, h for height 
fit.4 = cuttree(fit, h=4) 
fit.5 = cuttree(fit, h=5) 

# print the text or plot 
print(fit.4) 
print(fit.4) 
plot(fit.4) 
plot(fit.5)