标准eval与ggplot2没有'aes_string（）`

作者: 甲基蓝
发布时间: 2025-05-16 11:03:23 (22天前)
转自：

3 条回复

0#
回复此人
ikun | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 解决方法是在函数中用通用名替换感兴趣的变量名： </p> <pre> <code> g1 <- function( variable ) { colnames(mtcars) <- gsub(variable, "variable", colnames(mtcars)) ggplot(mtcars, aes(x=wt, y=variable, size=carb)) + geom_point() + ylab(variable) } variables <- c("mpg", "cyl", "disp") variables %>% lapply(g1) </code> </pre> </DIV>

编辑
1#
回复此人
枫 | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 你可以使用 <code> !! </code> 调用后的变量操作符 <code> sym </code> 。这将取消引用并进行评估 <code> variable </code> 在周围的环境中。 </p> <pre> <code> library(rlang) g1 <- function( variable ) { ggplot(mtcars, aes(x = wt, y = !! sym(variable) , size = "carb")) + geom_point() } g1("mpg") variables <- c("mpg", "cyl", "disp") variables %>% lapply(g1) </code> </pre> </DIV>

编辑

登录后才能参与评论