制作图例反映了geom_point类型

Question

我需要有一个情节（有几个y变量），当看到颜色时很好，但也可以在黑白（灰度）打印时理解。所以我尝试geom_point个形状。问题：我无法让ggplot2中的图例反映出图中点的形状。

以下是玩具数据：

# Defining vectors
gr <- c("group1", "group2", "group3")
v1 <- c(1.7, 1.5, 1.3)
v2 <- c(2.5, 2.1, 1.9)
v3 <- c(1.5, 1.8, 1.7)

# Combining vectors into one data frame
df <- data.frame(gr, v1, v2, v3)

使用以下代码开发图...

ggplot(df, aes(x=gr, group=1)) +
  # color ask for coloring, pch asks for point type
  geom_point(aes(y=v1, color="v1"), pch=19) + 
  geom_point(aes(y=v2, color="v2"), pch=0) + 
  geom_point(aes(y=v3, color="v3"), pch=24) + 
  geom_line(aes(y=v1, color="v1")) +
  geom_line(aes(y=v2, color="v2")) +
  geom_line(aes(y=v3, color="v3")) +
  theme_bw() 

...给出了这个结果：

如何使图例中的点形状反映出图中使用的点形状？

Answer 1

从宽到长转换然后用组进行转换：

cardinality=100