Блог

Учитывая foo , что я хотел бы соединить пары точек так, чтобы между foo[1,] и foo [11,], foo[2,] и foo [12,] была линия, вплоть до foo [10,] и foo[20,]. Похоже, это должно быть возможно с помощью хитрого вызова geom_segment и переменной группировки id ?

 foo <- data.frame(id = c(1:10,1:10),
                  samp = rep(c("A","B"),each=10),
                  x = c(rnorm(10,mean = 5),rnorm(10,mean = 5)),
                  y = c(rnorm(10,mean = 5),rnorm(10,mean = 6)))
ggplot(foo,aes(x=x,y=y,col=samp))   geom_point()
  

Любая помощь приветствуется.

Нам нужно использовать group как ‘id’ в geom_line

 library(ggplot2)
ggplot(foo)   
    geom_point(aes(x = x,y = y, col = samp))   
    geom_line(aes(x = x, y = y, group = id))
  

-вывод