Есть ли способ добавить центроиды и пауки в этот код графика PCoA?

Новое здесь и в использовании R в целом. Я пытаюсь изменить сценарий для создания графиков PCoA, чтобы включить центроиды и пауки (сегменты линий, соединяющие каждую точку выборки данных с центроидом). Аналогично прикрепленному изображению.1: https://i.stack.imgur.com/Tjj3T.png

Это код, который я использовал:

p.pcoa.wuniRM <- plot_ordination(ps2.prev_RM, ord.pcoa.wuniRM, color = "Location", axes = c(4,5)) +
  geom_point(size = 2, aes(shape = Location)) +
  labs(title = "PCoA of wUniFrac Distances", color = "Location") +
  theme(legend.text = element_text(size=5), aspect.ratio = 1)

Есть ли простой способ изменить этот сценарий, чтобы получить графики центроидов и пауков, или мне нужно найти другой сценарий?


person Jkacea    schedule 23.01.2021    source источник


Ответы (1)


Вы должны попробовать функцию stat_ellipse():

p +
 stat-ellipse()
person FrsLry    schedule 23.01.2021