R 和 ggplot-将 x 轴更改为日期可消除位置闪避

Question

我一直在使用 ggplot 来创建绘图，并且我总是喜欢水平偏移数据点，这样误差线就不会重叠。我发现当我使用日期数据作为 x 轴时，我失去了偏移数据点的能力。

DF=data.frame(Date=c("2006-09-01", "2007-09-01", "2008-09-01" ,"2009-09-01", "2010-01-01" ,"2011-01-01"),Count=c(1,2,3,4,5,6,2,4,6,8,10,12),Type=c('A','A','A','A','A','A','B','B','B','B','B','B'))

如果我像这样使用 ggplot 绘制上面的数据框，这些点就会偏移

dodge=position_dodge(.5)
ggplot(data=DF,aes(x=Date,y=Count,group=Type))+geom_point(position=dodge)

但是如果我将日期数据指定为实际日期

DF$Date=as.Date(DF$Date)
ggplot(data=DF,aes(x=Date,y=Count,group=Type))+geom_point(position=dodge)

这些点不再偏移，即使我指定它们是

我过去通过将日期数据限制为“年”并将其视为数字来避免此问题。但现在我需要包含月份信息(我在日期中包含了日期，因为“如果不包含的话，as.Date 会变得有点奇怪)。

谁能告诉我是否有一种方法可以使用 ggplot 绘制时间序列，这将允许我抵消我的数据点和误差线。

Answer 1

实际上，这些点被稍微躲避了。

您需要记住，一年之间的间隔是 365 天。position_dodge(0.5) 将点移动(半天)/2。因此，头寸以一年为间隔移动 0.5/2/365。

如果您选择`position_dodge(0.5 * 365)，那么您将得到预期的绘图:

DF <- data.frame(
  expand.grid(Date=c("2006-09-01", "2007-09-01", "2008-09-01" ,"2009-09-01"),
     Type = c("A", "B")),
  Count = 1:4)
DF$Date2 <- as.Date(DF$Date)

ggplot(data=DF,aes(x=Date2,y=Count,group=Type))+ geom_point(position = position_dodge(365*0.5))