我有以下資料框：
| 星期 | 年 | 政治化_sum |
|---|---|---|
| 52 | 2020年 | 5 |
| 53 | 2020年 | 10 |
| 1 | 2021年 | 0 |
| 2 | 2021年 | 4 |
| 3 | 2021年 | 11 |
對于這個資料框，我想politicalization_sum按時間順序繪制程序。我嘗試了以下方法：
per_week <- per_week %>%
arrange(desc(week))
ggplot(per_week, mapping = aes(x = week, y = politicalization_sum))
geom_point()
geom_smooth()
這樣，x 軸從第 0 周開始到第 53 周，中間有很大的差距。我該怎么做才能讓 x 軸從 2020 年的第 52 周開始并在 2021 年的第 3 周結束？
uj5u.com熱心網友回復：
像這樣的東西？
library(lubridate)
library(ggplot2)
library(dplyr)
per_week %>%
mutate(x = make_date(year)) %>%
mutate(date = x lubridate::weeks(week-1)) %>%
ggplot(aes(date, politicalization_sum))
scale_x_date(date_labels = "%Y (%b)")
geom_point()
geom_smooth()
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/368182.html
上一篇：如何剪輯影像以洗掉其填充
下一篇：在R中格式化日期格式不一致的向量