r - 使用矩阵索引列矩阵时如何理解错误“subscipts out of bound”
问题描述
考虑以下代码示例:
目标是用 mypoints 中的相应值替换 mymatrix 中的索引。
# example 1---------------------------------------------
mymatrix <- c(3,4,1,2, 2,1,4,3, 4,3,2,1)
dim(mymatrix) <- c(4,3)
mypoints <- matrix(c(10, 20, 30, 40), nrow(mymatrix), 1)
# loop
mysummary <- mypoints[mymatrix[,1]]
for (i in 2:ncol(mymatrix) ) {
mysummary <- cbind(mysummary, mypoints[mymatrix[,i]])
}
# ------------------------------------------------------
结果是:
mysummary
[1,] 30 20 40
[2,] 40 10 30
[3,] 10 40 20
[4,] 20 30 10
可以用更简洁的方式替换循环:
> mysummary <- mypoints[mymatrix]
> dim(mysummary) <- dim(mymatrix)
结果:
[,1] [,2] [,3]
[1,] 30 20 40
[2,] 40 10 30
[3,] 10 40 20
[4,] 20 30 10
但是,这在以下较小的示例中不起作用:
# example 3---------------------------------------------
> mymatrix <- c(2,1, 2,1)
> dim(mymatrix) <- c(2,2)
> mypoints <- matrix(c(10, 20), nrow(mymatrix), 1)
> mysummary <- mypoints[mymatrix]
Error in mypoints[mymatrix] : subscript out of bounds
我不知道哪个下标超出范围以及在哪个数组中。以及如何防止这个错误。
解决方案
如果索引矩阵mymatrix
有两列,则 R 假定您想使用第一列作为行索引,第二列作为列索引。mymatrix
所以它失败了,因为你的第二个例子中的第一行是2,2
,它超出了mypoints
.
在您的第一个示例中,mymatrix
有超过 2 列,因此 R 将其视为向量,这是在这种情况下唯一有意义的方法。
推荐阅读
- c - Bison语义谓词语法错误,杂散'#'
- python - 使用特定格式的python在CSV文件中抓取HTML表
- mysql - 如何解决mysql中的错误“子查询返回超过1行”?
- python - If else return issue in the loop in python
- php - 学说:如何从与标准的关联中按属性排序
- angular - Angular2通过http从txt文件中获取内容
- python - 从 OpenCv 中的图像中提取墙壁
- c# - 在 Asp.Net 中多次单击按钮时避免页面刷新事件
- javascript - $http.get AngularJS 中的 $event 对象
- c++ - 如何从函数返回动态分配的数组并正确删除它