R 树状图和HistDAWass包

R 树状图和HistDAWass包,r,csv,R,Csv,我使用HistDAWass包()来执行集群,使用的脚本部分由包作者提供 由于Data1.csv文件不包含带有行名称示例(标签)的列,因此我得到一个树状图,将树标签标记为I1…I6。 因此,我尝试使用一个新文件(Data2.csv),该文件的第一列包含标签,但出现了一个错误 如果有人能告诉我如何用新标签生成树状图,我将不胜感激 脚本: library(HistDAWass) data=read.csv('D:/Data1.csv', header = FALSE) data=t(data) Hda

我使用HistDAWass包()来执行集群,使用的脚本部分由包作者提供

由于Data1.csv文件不包含带有行名称示例(标签)的列,因此我得到一个树状图,将树标签标记为I1…I6。 因此,我尝试使用一个新文件(Data2.csv),该文件的第一列包含标签,但出现了一个错误

如果有人能告诉我如何用新标签生成树状图,我将不胜感激

脚本:

library(HistDAWass)
data=read.csv('D:/Data1.csv', header = FALSE)
data=t(data)
Hdata=MatH(nrows=6,ncols = 1)

for (i in 1:get.MatH.nrows(Hdata)){
  tmp=data2hist(as.vector(data[,i]))
  Hdata@M[i,1][[1]]=tmp

}

results=WH_hclust(x = Hdata,simplify = TRUE, method="complete")
plot(results) # it plots the dendrogram
数据文件(zip格式):

脚本包含一种生成矩阵的方法,其中每个单元格中都有一个
distributionH
对象。根据原始数据(csv文件的每一行)在
for
循环中的
分配h
,构建一个新的
数学
(分配矩阵)。 要从Data2.csv文件构建相同的文件,您应该运行以下脚本

 library(HistDAWass)
#read data
data=read.csv('Data2.csv', header = FALSE)
#initialize an empty MatH matrix using names from the firs colum of data
Hdata=MatH(nrows=nrow(data),rownames=as.list(as.character(data[,1])),ncols = 1)

#Fill the matrix
for (i in 1:get.MatH.nrows(Hdata)){
  tmp=data2hist(as.vector(t(data[i,2:ncol(data)])))
  Hdata@M[i,1][[1]]=tmp

}
#Do hierarchical clustering
results=WH_hclust(x = Hdata,simplify = TRUE, method="complete")
plot(results) # it plots the dendrogram