从随机样本中顺序添加数字

Question

我正在尝试按顺序添加20个rnorm值输出，第一个值被添加到1000.如何将每个值添加到之前，而不是将20个随机rnorm值添加到1000，如果是这样的话我使用下面的代码

storage1 <- rnorm(n=nyear, mean=1, sd=0.4)+1000

我正在编写一个循环，以便每个值对应一年（从1:20），如下面的循环代码所示

N <- 1000
nyear <- 20
years <- 1:nyear
set.seed(101)
storage1 <- rnorm(n=nyear, mean=1, sd=0.4)+N
for (i in seq_along(years)) {
  print(paste("year",years[i],": reproduction=",storage1[i]))
}