ggplot列表值基于打印更改

作者: 仙风道骨刘憨憨
发布时间: 2024-09-01 08:01:30 (2天前)
转自：

2 条回复

0#
回复此人
晴天3 | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 打印强制对参数i进行评估，否则R的延迟评估会延迟查找其值，直到绘制渲染时间为止，此时它只是2。 </p> <P> 一种选择是使用 <code> force() </code> 在一个功能： </p> <pre> <code> plot.g <- function(i) { force(i) qplot(1:5, 1:5 * (-1)^i) } grob.list <- vector("list", length = 2) for (i in 1:2) { grob.list[[i]] <- plot.g(i) } grid.arrange(grobs = grob.list) </code> </pre> <P> ......或者使用 <code> lapply </code> 在现代版本的R中，它将强制评估论证 <code> i </code> ： </p> <pre> <code> l <- lapply(1:2,function(i) qplot(1:5, 1:5 * (-1)^i)) grid.arrange(grobs = l) </code> </pre> </DIV>

编辑

登录后才能参与评论