我如何将 ymd 中的数据重塑为年份？

Question

我想绘制多年来主题的频率。 但是我的包含日期的变量具有以下结构，例如：2016-01-01。 这意味着数据的结构以天为单位。 但是，我希望每月对数据进行可视化。

数据在 data.frame 中结构化

我试图将我的主题频率可视化如下：

  ggplot(data = dat,
       aes(x = date,
           fill = Topics[1])) +
  geom_freqpoly(binwidth = 30)

但是，当我执行命令时，我的可视化仅每三个月显示一次，例如：一月、四月、七月等。

如何获取 x 轴上的日期以显示所有月份：（一月、二月、三月、四月......等）？

Answer 1

您可以编辑 x 轴标签

library(tidyverse)
library(lubridate)

last_month <- Sys.Date() - 0:199
df <- data.frame(
  date = last_month,
  price = runif(200)
)
base <- ggplot(df, aes(date, price)) +
  geom_line()

base + scale_x_date(date_breaks = "months", date_labels="%B")