x [ind，]-centerI中的错误：不整合数组

问题描述

我有一个时间序列数据集。我想使用不同的聚类技术对其进行聚类。然后，我想评估每种方法。我尝试了clusterSim包中的R代码。但是，我遇到了一个错误”

Error in x[ind,] - centerI : non-conformable arrays。我不知道为什么会收到这个错误。

这是我的代码：

library(dtwclust)
library(Tsclust)
library(dplyr)
library(clusterSim)
data("interest.rates")
rate.change <- diff(log(interest.rates),1)
md <- diss(rate.change,"AR.MAH")$p_value
min_nc=2
max_nc=8
res <- array(0,c(max_nc-min_nc+1,2))
res[,1] <- min_nc:max_nc
clusters <- NULL
for (nc in min_nc:max_nc)
{
  hc <- hclust(md,method="average")
  cl2 <- cutree(hc,k=nc)
  res[nc-min_nc+1,2] <- DB <- index.DB(rate.change,cl2,md,centrotypes="medoids")$DB
  clusters <- rbind(clusters,cl2)
}rate.change <- diff(log(interest.rates),1)

原始代码如下：

# Example 3
library(clusterSim)
data(data_ratio)
md <- dist(data_ratio,method="euclidean")
# nc - number_of_clusters
min_nc=2
max_nc=8
res <- array(0,1] <- min_nc:max_nc
clusters <- NULL
for (nc in min_nc:max_nc)
{
hc <- hclust(md,method="complete")
cl2 <- cutree(hc,k=nc)
res[nc-min_nc+1,2] <- DB <- index.DB(data_ratio,centrotypes="centroids")$DB
clusters <- rbind(clusters,cl2)
}

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）