使用knit生成PDF时出现‘object mean_list not found’错误的解决方法

这个问题太常见啦！你遇到的报错原因很直白：在循环开始前，你没有初始化mean_list这个变量。当第一次循环执行到mean_list <- c(mean_list, mean_data)时，R找不到mean_list的定义，就会抛出"object not found"的错误。

下面给你两种修复方法，第二种还能优化代码效率：

方法1：提前初始化空向量 #

在循环前先创建一个空的mean_list，让R知道这个变量的存在：

nRuns <- 100
mean_list <- numeric()  # 初始化空的数值向量（也可以用mean_list <- c()）
for (i in seq_len(nRuns)) {
  x <- rpois(10, lambda = 10)
  mean_data <- mean(x)
  mean_list <- c(mean_list, mean_data)
}

方法2：预分配向量长度（更高效） #

如果你的循环次数很多（比如nRuns是上万甚至更多），每次用c()追加元素都会让R重新分配内存，速度会变慢。更优的做法是提前给mean_list分配好固定长度：

nRuns <- 100
mean_list <- numeric(nRuns)  # 直接创建长度为100的空数值向量
for (i in seq_len(nRuns)) {
  x <- rpois(10, lambda = 10)
  mean_list[i] <- mean(x)  # 直接给对应位置赋值，不用反复扩容
}

这种预分配的方式在处理大规模循环时，效率提升会很明显，推荐你日常写循环时都用这种思路~

内容的提问来源于stack exchange，提问作者smilefxm