R中带有for循环的矩阵

Question

我在 R 中有以下代码

    M <- matrix(NA, nrow = length(27:45), ncol = 2)
colnames(M) <- c("Age", "Whole Life Insurance Benefits")
i<-1
for (i in seq(27, 45, by=1)) {
  M[i,1]<- i
  M[i,2]<- Axn(actuarialtable = lc.lifetable, x=i)
  i<-i+1
}
M

当我运行它时出现错误subscript out of bounds 但是如果我更改nrow=length(0:45) 它运行没有错误，但我的矩阵中有很多 NA。你能告诉我有什么问题吗？

谢谢

Answer 1

您的代码中有 2 个问题：

1. 与 nrow=length(27:45) 您只有 19 行，但您的序列在 if函数从不存在的27开始 在你的矩阵中，你必须从 1 开始。

2. 当你使用 if 函数时，如果你插入 i<-i+1 在你的循环中，计数器 按 2 求和，也可以使用 1:19 代替 seq(1,19,by=1)

这是正确而简单的代码：

M <- matrix(NA, nrow = length(27:45), ncol = 2)
colnames(M) <- c("Age", "Whole Life Insurance Benefits")
i<-1
for (i in 1:length(27:45)) {
  M[i,1]<- i
  M[i,2]<- Axn(actuarialtable = lc.lifetable, x=i)
}
M