r - R和ggplot2:如何连接折线图和极坐标的点？

正如我的同事指出的那样，点点滴滴是他们在小学教书的。
数据如下：

hour_timetable  mean_delayed_pass
0   6.074
1   6.512
2   7.632
3   9.393
4   8.759
5   4.600
6   6.040
7   5.575
8   5.680
9   6.315
10  6.895
11  7.852
12  6.832
13  6.961
14  6.322
15  5.954
16  5.579
17  5.540
18  5.142
19  5.579
20  6.139
21  6.501
22  6.140
23  6.061

这是代码：

library(ggplot2)
ggplot(data = test_vis, aes(x = factor(hour_timetable), y = mean_delayed_pass, group = 1)) +
   ylim(0, NA) +
   geom_point(color = 'purple', stat = 'identity') +
   geom_line(color = 'purple') +
   coord_polar(start = -0.12) # why offset?

最佳答案

使用geom_polygon()代替geom_line()。您可以使用geom_polygon(..., fill=NA)为多边形设置空填充。

试试这个：

library(ggplot2)
ggplot(data = test_vis, aes(x = factor(hour_timetable), y = mean_delayed_pass, group = 1)) +
  ylim(0, NA) +
  geom_point(color = 'purple', stat = 'identity') +
  geom_polygon(color = 'purple', fill=NA) +
  coord_polar(start = - pi * 1/24)

要将零点放在图的顶部，请使用offset = - pi / 24。

关于r - R和ggplot2:如何连接折线图和极坐标的点？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/25247834/