r - 组合/合并两个 ggplot 美学

Question

假设我有两个 ggplot 美学:

a.1 <- aes(v.1=1, v.2=2)
a.2 <- aes(v.3=3)

有没有办法结合已经建成的美学？在我的示例中，它类似于:

a.merged <- aes(v.1=2, v.2=2,v.3=3)

我知道 aes_string 可用于从字符向量构建美学，可以连接，但我正在研究已经构建了两种美学的情况，我想避免首先将它们转换为字符。

Answer 1

> c(a.1,a.2)
$v.1
[1] 1

$v.2
[1] 2

$v.3
[1] 3

aes对象是“未计算的表达式”和 c()函数按预期工作，具体取决于您对“预期”的定义。为了安全起见，您可能需要重新添加被 c() 剥离的类。 :

a.merged <- c(a.1,a.2)
class(a.merged) <- "uneval"

如果你想一步完成，那么函数 modifyList不会剥离“名称”-less 属性:

> modifyList(a.1, a.2)
List of 3
 $ v.1: num 1
 $ v.2: num 2
 $ v.3: num 3
> attributes(modifyList(a.1, a.2))
$names
[1] "v.1" "v.2" "v.3"

$class
[1] "uneval"