У меня есть следующий фрагмент кода в R:

dat <- data.frame(cond = factor(rep("A",10)), 
                  rating = c(1,2,3,4,6,6,7,8,9,10))
ggplot(dat, aes(x=cond, y=rating)) +
  geom_boxplot() + 
  guides(fill=FALSE) +
  geom_point(aes(y=3)) +
  geom_point(aes(y=3)) +
  geom_point(aes(y=5))

Этот конкретный фрагмент кода создает блокпост, в котором одна точка проходит над другой (в приведенном выше случае одна точка 3 проходит над другой точкой 3).

Как я могу переместить точку 3, чтобы она осталась в том же положении на оси y, но слегка сместилась влево или вправо по оси x?