大家好，我是R新手，在学习机器学习这本书，仿照第一章想做一个数据的直方图
数据如下
其中wed_date已经转换成日期格式（ship_date不知为什么总是转换不了）
那我就尝试用wed_date来做X轴，生成一个直方图
quick.hist <- ggplot(album, aes(x = wed_day)) +
geom_histogram() +
scale_x_date(date_breaks = "1 year", date_labels = "%Y")
ggsave(plot = quick.hist,
filename = file.path("images", "quick_hist_album.pdf"),
height = 6,
width = 8)
代码执行没问题，可是生成出来的PDF不对，横轴没有出现坐标，按照理想情况应该是2014，2015，2016
现在出来的数据统计都在x轴0值上，还有些乱七八糟的线
还请指点哪里出问题了，谢谢
