如何將 `key_glyph` 與 `geom_jitter` 一起使用？

Question

以下內容不會向圖例添加任何內容：

ggplot(diamonds, aes(x = color, y = table, color = cut)) + 
  geom_jitter(key_glyph = draw_key_rect)

draw_key_point有效， draw_key_dotplot有效。 draw_key_rect也可以完美地與geom_line或geom_linerange等幾何圖形一起使用。 如何使用積分？

Answer 1

為矩形添加美學fill

library(tidyverse)

diamonds %>% 
  ggplot()+
  geom_jitter(aes(x=color, y=table,
                  color=cut,
                  fill=cut),
                  key_glyph = draw_key_rect)

^{由代表 package (v0.3.0) 於 2020 年 12 月 1 日創建}