我正在尝试绘制一个以日期为 x 轴的条形图。我想自己设置限制,但如果我这样做并且只有一个观察结果,条形就会变得非常小。
# correct plot
economics2 <- economics %>%
subset(date> "2010-01-01" & date < "2011-06-01") %>%
head(2)
ggplot(economics2, aes(date, unemploy))+
geom_bar(stat="identity")+
scale_x_date(limits = as.Date(c("2009-01-01","2012-01-01")))
这会生成一个正确的图 - 但如果我将 head 更改为 1,则会生成一个错误的图:
# plot with error / slim bar
economics2 <- economics %>%
subset(date> "2010-01-01" & date < "2011-06-01") %>%
head(1)
ggplot(economics2, aes(date, unemploy))+
geom_bar(stat="identity")+
scale_x_date(limits = as.Date(c("2009-01-01","2012-01-01")))
我已经尝试过使用 xlim 但它导致了同样的问题。如果我手动修复 geom_bar 参数宽度,它会起作用。另一方面,我必须想出一个关于如何自己选择正确条宽的解决方案。
我错过了什么?