построение сложенных точек с использованием ggplot

Question

У меня есть фрейм данных, и я хотел бы сложить точки, которые перекрываются точно друг на друга.

вот мои примеры данных:

value <- c(1.080251e-04, 1.708859e-01, 1.232473e-05, 4.519876e-03,2.914256e-01, 5.869711e-03, 2.196347e-01,4.124873e-01, 5.914052e-03, 2.305623e-03, 1.439013e-01, 5.407597e-03, 7.530298e-02, 7.746897e-03)
names = letters[1:7]
data <- data.frame(names = rep(names,), group = group, value = value, stringsAsFactors = T)
group <- c(rep("AA", 7) , rep("BB", 7))

Я использую следующую команду:

p <- ggplot(data, aes(x = names, y = "", color = group)) + 
geom_point(aes(size = -log(value)), position = "stack") 
plot(p)

Но круг с ячейками выделяется из сетки. Я хочу, чтобы это было близко или точно рядом с нижним кругом. Есть ли у вас какие-либо идеи, как я могу решить эту проблему?

Спасибо,

Answer 1

Ось Y не имеет числового значения c, поэтому вместо нее используйте group. И теперь нам не нужна цветовая легенда, поскольку метки групп показаны на оси Y.

ggplot(data, aes(x = names, y = group, color = group)) + 
  geom_point(aes(size = -log(value))) +
  guides(color=FALSE)