我正在尝试用两种不同的填充方法制作箱形图,并用多年的连续日期数据(但每年只有一个小节)。我的数据看起来很简单:
date, number, type
2007-06-07 2 tot
2007-06-09 3 tot
2007-06-12 0 gps
因此,我导入了我的数据,并使用te as.Date
函数对日期进行了格式化,并且可以正常工作。我将所有NA都更改为0。然后尝试了以下代码:
p1 <- ggplot(sights, aes(x =date, y = number, group=date, fill = type)) +
geom_boxplot(alpha=0.7)
p1
我有一个类似的情节: plot
所以我尝试了如下代码:
p1 <- p1+scale_x_date(breaks = as.Date(c("2005", "2006", "2007","2009", "2010", "2011", "2012", "2013", "2014","2015", "2016","2017","2018")))
p1
但是它不起作用。得到一些帮助真是太神奇了!我也想在一个月后这样做;)
编辑:我在2101年左右有一些离群值。我删除了它们,现在得到: plot2
答案 0 :(得分:0)
这不是答案,而是评论,但我没有足够的声誉来发表评论。此输出是否接近您想要的?
sights %>%
mutate(year = format.Date(date, "%Y")) %>%
ggplot(aes(x = year, y = number, fill = type)) +
geom_boxplot(alpha=0.7)