Question

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

有什么建议吗？

Answer 1

如果您首先使用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()

显然，这没有使用您的数据和代码进行测试，但它与help（coord_polar）页面中的示例一起使用

使用coord_polar（）将geom_hline添加到密度图

1 个答案: