0

我需要使用 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)

有什么建议么？

4

1 回答 1

2

如果您首先使用 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）页面中的示例

于 2011-12-27T04:03:17.947 回答