Як підкреслює моя колега, підключення точок є те, що вони навчають у вищій школі.
Ось дані:
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?
Відповіді:
8 для відповіді № 1Використовуйте 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
.