連接 ggplot2 中 geom_jitter 點的線

Question

我正在嘗試連接geom_jitter()的點。

 df<-data.frame(x = c(1, 1, 2, 2, 3, 3), 
           y = c(1, 1, 2 , 3, 6, 5), 
           z = c("A", "B", "A", "B", "A", "B")) 
ggplot(df, aes(x = x, y = y, col = z)) + 
  geom_jitter() + 
  geom_line()

現在線和點沒有連接。

Answer 1

library(dplyr)
ggplot(df %>% mutate(x = jitter(x), y = jitter(y)), 
       aes(x = x, y = y, col = z)) + 
  geom_point() + 
  geom_line()

Answer 2

將抖動（一些偏差）添加到您的數據中，然后繪制有偏差的數據。