绘制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输入来得到它。

这是我在之前的绘图中使用的代码，它不适用于这个新的框架。忽略de black线。

 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()

​

​