绘制geom_line（）+ geom_point（）R

Question

我有以下框架：

 df = data.frame(d = rep(1:3,each=2),
                         x = rep(c(0,1),3),
                         y = c)
 df

  d x   y
1 1 0 0.0
2 1 1 1.0
3 2 0 0.0
4 2 1 1.0
5 3 0 0.0
6 3 1 0.5

我想用我的数据得到一个与此相似的图：

我将其与其他data.frames一起使用，但在此示例中，我重复了数据，因此我想我没有为ggplot提供正确的df输入来获取它。

这是我用于上一个绘图的代码，不适用于此新框架。忽略黑线。

 q = ggplot(data=df_Hurwicz, aes(x, y, color=d)) + 
   geom_point() +
   geom_line()

预先感谢

Answer 1

您很近。诀窍是将color映射到分类数据：

library(ggplot2)

df = data.frame(d = rep(1:3,each=2),
                x = rep(c(0,1),3),
                y = c(0, 1, 0, 1, 0, 05))

ggplot(data = df, aes(x, y, color = factor(d))) + 
  geom_point() +
  geom_line()

或者明确设置group的美感。

library(ggplot2)

df = data.frame(d = rep(1:3,each=2),
                x = rep(c(0,1),3),
                y = c(0, 1, 0, 1, 0, 05))

ggplot(data = df, aes(x, y, color = d, group = d)) + 
  geom_point() +
  geom_line()