让损失为500x24矩阵。我通过键入来控制是否存在任何无限元素:
> any(abs(Loss==Inf))
[1] TRUE
结果告诉我们矩阵中至少有一个无限元素。
所以我搜索包含无限元素的列。所以我输入以下代码:
n1<-dim(Loss)[2]
xx<-sapply(1:n1, function(i) {any(abs(Loss[i])==Inf)})
> xx
[1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
这次似乎没有列包含无限元素。
为什么?我会很高兴得到任何帮助。非常感谢。