使用每周数据格式化ggplot中的x_scale

Question

在我的ggplot中，我设法根据时间创建x_scale（我有每周数据），但我不确定如何使用{{1}创建年月标签}

以下是我的代码 - 我尝试使用scale_x_date和(...breaks = "1 month")，但这不会产生预期的结果。我的目标是标签只是(...minor_breaks = "1 month")，Dec-16，Jan-17等等。使x_scale以缩写方式显示Feb-17的正确格式是什么？

Month-Year

以下是数据样本

ggplot(data=test, aes(x=as.Date(test$weekly), y=test$dist, group=1)) +
  geom_path(col = "blue") +
  scale_x_date(labels = date_format("%b-%Y"))