在运行下面的第二个循环后,我一直收到错误:
Error in integer(n) : invalid 'length' argument
我几乎可以肯定,之前没有任何修改,我很难找到出现此错误的原因。任何帮助将不胜感激。
mv <- c(0,1,2) # location vector
s <- 1 # scale
increment <- seq(-6,6,0.01) # Create a sequence of x values
y=matrix(0,length(increment),length(mv))
for (i in 1:length(increment)) {
for (j in 1:length(mv)) {
y[i,j] <- 1/(1+ exp(-(increment[i]-mv[j])/s))
}
}
# Create matrices:
valuematrix <- vector("list",ncol(y))
for (i in 1:ncol(y)) {
newmatrix <- replicate(rep,y[,i])
valuematrix[[i]] <- newmatrix
}