r - "could not find function H"从 R 中的 txt 文件加载的变量

Question

我正在尝试对从文件加载的数据集“H”进行聚类，但 R 告诉“无法找到函数 H”。我的代码看起来像

H=read.table("X3.txt")
y=read.table("Y3.txt")
#X[3,]
#length(X[3])
#y
#y[3,]
m=2;R = 2; Ec = 0.001
p=1/(m-1)
Cold=matrix(c(1.89,3.76,2.47,4.76),2,2,byrow=TRUE)
C=matrix(,2,2)
M=length(H[,1])
mu=matrix(,M,R)


repeat {
for (i in 1:M){
   for (j in 1:R){
        for (k in 1:R){
            mu(i,j)= (((H(i,)-Cold(j,))^2)/((H(i,)-Cold(k,))^2))+mu(i,j)
}

 }
}
mu=1/mu;


#centre Update
for (j in 1:R){
A=matrix(,1,2);B=matrix(,1,2);
    for (i in 1:M){
            A=H(i,)*mu(i,j)^m+A;
            B=mu(i,j)^m+B
}
C(j,)=A/B;
}
# centre update end


if (abs(Cold-C)>Ec) {Cold=C
} else {break()}
} #repeat ending loop
C

有人可以帮助我如何解决这个问题，当我运行代码时出现以下错误 错误:找不到函数“H”

Answer 1

在#centre更新部分，在for循环中您使用以下代码: H(i,) 我假设您正在尝试获取此 H 矩阵的第一行。所以使用 [] 像这样: H[i,]

() - 函数

[] - 用于矩阵/data.frame子集化