`[.data.frame`（df，，i）中的错误：未定义的列选择
好吧，显然我在可重复的代码中犯了一个不幸的错误。它现在可以工作，但 ll 列表中的所有图都是同一个图。当我运行这个： $ p $ do.call（grid.arrange，ll）
我收到以下图片：
所有地块都是一样的！这也是当我通过我的数据运行时获得的输出。
解决方案无论如何。您需要执行以下操作：
ll <-lapply（ seq（1,5），函数（i）qplot（data = data.frame（y = df [，i]），df1，y））这会迫使每个图表的y值更新。
在这个其他的讨论中 SO Post 。
I have been using lapply and sapply as my go-to functions recently. So far so good, but why the following code does not work baffles me.
df<-as.data.frame(matrix(rnorm(50),ncol=5)) names(df)<-c("x1","x2","x3","x4","x5") df1<-seq_len(10) ll<-lapply(seq(1,5), function(i) qplot(df1,df[,i]))I get the error:
Error in `[.data.frame`(df, , i) : undefined columns selectedOk, apparently I made quite an unfortunate mistake in my reproducible code. It works now, but all the plots in the ll list are the same plot. When I run this:
do.call(grid.arrange,ll)
I get the following image:
All the plots are the same! This is also the output I get when I run this through my data.
解决方案There are problems with lazy evaluation, or something like it anyway. You need to do the following:
ll<-lapply( seq(1,5), function(i) qplot(data=data.frame(y=df[, i]), df1, y) )This will force the y values to be updated for each plot.
More discussion in this other SO Post.
更多推荐
使用lapply的地块列表
发布评论