test.r<-function(X1){

X1<-as.matrix(X1)     

X<-dist(X1)

a<-nrow(X1)

Y<-matrix(rep(0,(2*a-1)*2),ncol=2)  

hc<-hclust(X,”ward”)   

for(i in 1:a){

Y[i,1]<--i

Y[i,2] <-1

}

……

每次运行到红色那行，R就认为我写的函数结束了，前面的符号又变成了">"

这是为什么啊？？