Структурная диаграмма, где каждый член группы связан с центром и всем кластерным грандиозным центром в r

Я пытаюсь создать структурную диаграмму из следующих данных:

mydf <- data.frame ( group = rep (1:5, each = 20), z = rnorm (20, 10, 1),
                  x = c(rnorm (20, 2, 0.5), rnorm (20, 2, 0.5),
          rnorm (20, 9, 0.5), rnorm (20, 9, 0.5),rnorm (20, 5, 0.5)),
       y = c(rnorm (20, 2, 0.5), rnorm (20, 9, 0.5), rnorm (20, 2, 0.5),
      rnorm (20, 9, 0.5), rnorm (20, 2, 0.5)))

means <- aggregate(. ~ group, data = mydf, mean)
gmx <-mean (mydf$x)
gmy <- mean (mydf$y)

library(ggplot2)
ggplot(mydf, aes(x, y)) +
geom_point(aes(colour= factor (group), size=z)) + theme_bw()

Я хочу, чтобы соединить каждую точку в каждом кластере с центром, а затем обозначить центр кластера в градиент. Это будет производить график, подобный следующему (только грубый эскиз, где два кластера подключены к центру, в действительности все кластеры имеют одинаковый):.........

(Я бы хотел использовать сегменты линий того же цвета, что и кластер, если это возможно)

Ответ 1