r - 忽略未知的美学 : text in ggplot (using numbers or letters as points)

Question

我有这个数据集:

library(tidyverse)
dataset <- data.frame(CustomerId = c(1,2),
                      umap_01 = c(0.0198, -0.319),
                      umap_02 = c(0.336, -0.321))

我想用以下代码创建一个 ggplot:

p <- dataset %>%
  ggplot(aes(umap_01,umap_02)) +
  geom_point(aes(text = CustomerId), alpha = 0.5)

但是我收到了这条消息:

Warning message:
Ignoring unknown aesthetics: text 

我不明白为什么文本是一种有效的美学。拜托，你能帮我这个代码吗？我做错了什么？

Answer 1

另一个选择是使用形状。如果您将一列数据传递到 aes 中，则需要使用 scale_shape_identity 或 I()。

library(tidyverse)
dataset <- data.frame(CustomerId = c(1,2),
                      umap_01 = c(0.0198, -0.319),
                      umap_02 = c(0.336, -0.321))
dataset %>%
  ggplot(aes(umap_01,umap_02)) +
  geom_point(aes(shape = I(as.character(CustomerId))), size = 10, alpha = 0.5) 

^{由 reprex package 于 2021 年 4 月 30 日创建(v2.0.0)}