Линии R-графика на полярной диаграмме, использующие другую переменную для угла

Question

Я пытаюсь воссоздать этот тип графика с помощью R, возможно ggplot, но не привязан к нему.

mydata <- data.frame(Group = letters[1:5],
                 Distance = seq(1000, 5000, 1000),
                 Change = c(-10, 5, -20, 15, -30))


#  Input the same origin point

mydata <- rbind(mydata, data.frame(Group = letters[1:5], Distance = 0, Change = 0))

ggplot(mydata, aes(x = Change, y = Distance, group = Group)) + geom_line() + coord_polar(theta = "y")

Но япросто получаю спираль - и я не совсем уверен, куда идти отсюда.Я не знал, нужно ли мне начинать использовать угол и пытаться построить из него координаты х / у.

Answer 1

Исходя из приведенных выше комментариев в комментариях - это ответ, который я придумал.Спасибо всем.

library(ggplot2)




mydata <- data.frame(Group = letters[1:5],
                     Distance = seq(1000, 5000, 1000),
                     Change = c(-10, 5, -20, 15, -30))



#  Input the same origin point

mydata <- rbind(mydata, data.frame(Group = letters[1:5], Distance = 0, Change = 0))

ggplot(mydata, aes(x = Change, y = Distance, color = Group)) + coord_polar(start = 3.5*pi*max(mydata$Change)/diff(range(mydata$Change))) + 
  geom_segment(aes(y = 0, xend = Change, yend = Distance))