■

読み込んだ距離行列から，デンドログラムを作成する．
リスト→マトリクス形式にawkでファイルを変換した後行う．

rm(list=ls())
y2 <- read.table("Convert_Matrix_Count_v1.txt", sep=",")
y <- 1/y2 #大きい方が距離近い数なので逆数に
y[upper.tri(y,diag=TRUE)] <- "" #対角成分含む上三角行列をnullに
plot(hclust(as.dist(y),method="ward")) #ward法による描画
cy <- hclust(as.dist(y))

参考