万分希望您能回答以下
哪里获得的代码?
输入文件有问题吧;你看你的输入文件格式和例子是否一致
如果觉得我的回答对您有用,请随意打赏。你的支持将鼓励我继续创作!
检查输入的矩阵是否有Inf值:
X = X[apply(X, 1, function(x) sd(x)!=Inf),]
X <- X[!apply(is.infinite(X), 1, any), ]