R - рисовать эллипс в ScatterPlot (не * stat-ellipse)

Question

У меня есть точечная диаграмма, созданная с помощью ggplot в R:

ggplot(data, aes(x=x, y=y)) + 
  xlim(0,800) + 
  ylim(0,600) + 
  geom_point(colour="black") + 
  geom_path(aes(color="red")

Я хочу нарисовать эллипс, наложенный на этот график (пожалуйста, не эллипс доверительного интервала), используя координаты центра, высоту и ширину.

Я пробовал функцию draw.ellipse из пакета plotrix, но она работает только на диаграмме рассеяния, созданной по умолчанию для R plot функция.

Кто-нибудь знает, как нарисовать эллипс на диаграмме рассеяния, созданной ggplot?

Answer 1

Я только что столкнулся с той же проблемой сегодня! Вот решение для вашего случая. Сначала убедитесь, что вы создали диаграмму рассеяния с помощью ggplot2, затем загрузите и импортируйте пакет ggforce. Добавить

geom_ellipse(aes(x0=x, y0=y, a=axis length on x direction, b=axis on y direction), fill=..., alpha=...)+geom_polygon()

для заполненного полупрозрачного эллипса в точке (x, y). Если вы не хотите, чтобы он был заполнен, просто вырежьте параметр fill и alpha и замените geom_polygon () на geom_path ().

Надеюсь, это поможет!