Добавление geom_hline к графику плотности с помощью coord_polar()

Мне нужно добавить опорную линию к моему графику плотности, используя R и ggplot2.

Поскольку я использую полярные координаты, это должно сделать круг в середине моего графика. Я использую geom_hline(yintercept = .5), но на моем графике не появляется линия, когда я добавляю coord_polar().

Вот мой код.

ggplot(flights_sample2, aes(x = radians, fill = factor(nf, levels = c(8:0)))) +
    geom_bar(binwidth = pi/18, position = "fill") +
    scale_x_continuous(limits = c(0, 2*pi), breaks = c(0,pi/2, pi, 3*pi/2), 
                                            labels = c("N", "E", "S", "W")) +
    coord_polar() + 
    xlim(0,2*pi) + 
    geom_hline(yintercept = .5)

Какие-либо предложения?


r ggplot2 polar-coordinates
person user1116792    schedule 26.12.2011    source источник
comment
Ваш пример не воспроизводим.   -  person Roman Luštrik    schedule 27.12.2011

Ответы (1)


arrow_upward
2
arrow_downward

Если вы сначала настроите ссылку с помощью geom_line, а затем добавите coord_polar(), вы можете получить опорную окружность:

xx=seq(0,2*pi,length=10)
yy=rep(2,10)
g <- ggplot(flights_sample2, aes(x = radians, fill = factor(nf, levels = c(8:0)))) +
    geom_bar(binwidth = pi/18, position = "fill") +
    scale_x_continuous(limits = c(0, 2*pi), breaks = c(0,pi/2, pi, 3*pi/2), 
                                            labels = c("N", "E", "S", "W")) +
        xlim(0,2*pi) + 
    geom_hline(aes(x=xx, y=yy))

g+coord_polar()

Очевидно, это не было проверено с вашими данными и кодом, но это сработало с примером на странице справки (coord_polar)

person IRTFM    schedule 27.12.2011