Question

我正在处理大约24小时，5分钟增量的数据。Click here for Dataset Click here for dput()

显然，将以下结果绘制在拥挤的x轴上：

 ggplot(df, aes(fill=cos,y=pctdrops, x=date))+
  geom_bar(position="dodge",stat="identity")+
  scale_x_datetime(date_breaks = "5 min",date_labels="%M")

ggplot(df, aes(fill=cos,y=pctdrops, x=date))+
  geom_bar(stat="identity")

为了尝试解决问题，我尝试了以下方法：

lims <- as.POSIXct(strptime(df$date,format = "%Y-%m-%d %H:%M"))

ggplot(data = df, 
       aes(x = date, y = pctdrops)) + 
  geom_line(size = 1.25) + 
  scale_x_datetime(labels = date_format("%H:%m"), 
                   breaks = date_breaks("5 min"), 
                   limits = lims,
                   expand = c(0, 0)) +
  theme_linedraw()

并接收“zero_range（范围）中的错误：x必须是长度1或2”

我尝试通过添加：

来解决这个问题

scale_y_continuous(limits=c(0, 33.333), breaks=seq(0, 33.333, .556))

其中y是pctdrops 0％ - 33.333％，增量为.556％

代码：

ggplot(data = df, 
       aes(x = date, y = pctdrops)) + 
  geom_line(size = 1.25) + 
  scale_x_datetime(labels = date_format("%H:%m"), 
                   breaks = date_breaks("5 min"), 
                   limits = lims,
                   expand = c(0, 0)) +
  scale_y_continuous(limits=c(0, 33.333), breaks=seq(0, 33.333, .556))
  theme_linedraw()

我仍然收到“zero_range（范围）中的错误：x必须是长度1或2”

我不确定自己是否走在正确的轨道上，但无论哪种方式都需要帮助解决拥挤的x轴问题。

拥挤的日期时间x轴ggplot2

0 个答案: