将 aes_string 或 aes_q 与多个列标签组合

Question

我正在尝试将使用多个列的标签与用于为 ggplot2 中的标签着色的灵活变量名称组合。

我可以使用 aes 中的硬编码变量名称“ret_cumarpu_cluster”来做到这一点，如下所示：

ggplot(mergedata, aes(d2ret, d14cumarpu, col = ret_cumarpu_cluster)) +
    geom_point() +
    geom_text(aes(label=paste(device_bucket, d90installs), col = ret_cumarpu_cluster), hjust = -.15, show.legend = FALSE)

生成此图：

但是，我想用字符串对象 cluster_type 替换硬编码字符串“ret_cumarpu_cluster”以生成多个图形。我尝试了 aes_q 和 aes_string 的各种迭代，但似乎没有一个能很好地将两个列名粘贴在一起以生成标签。理想情况下，我的代码如下所示：

ggplot(mergedata, aes_string('d2ret', 'd14cumarpu', col = cluster_type)) +
    geom_point() +
    geom_text(aes_q(label=(paste(device_bucket, d90installs)), col = as.name(cluster_type)), hjust = -.15)

正如我所说，我不能完全让粘贴与 aes_q 或 aes_string 一起使用以允许我拥有多列标签。

作为一种解决方法，我显然可以在数据框中创建一个新列，将这两个字符串粘贴在一起并使用它，但我想知道这是否可能。谢谢！

Answer 1

我可以在粘贴前添加一个 ~ 来让 aes 将名称识别为列。

ggplot(mergedata, aes_string('d2ret', 'd14cumarpu', col = cluster_type)) +
  geom_point() +
  geom_text(aes_q(label=~(paste(device_bucket, d90installs)), col = as.name(cluster_type)), hjust = -.15, show.legend = FALSE)