显示R中ggplot x轴上的所有时间间隔

时间:2017-01-09 00:17:22

标签: r ggplot2

我试图在R的情节的x轴上创建年度时间间隔,但我不断收到错误:

as.Date.numeric(value)出错:' origin'必须提供

我的数据看起来像这样

 category start_date   end_date
    (chr)     (date)     (date)
1     A      2000-03-16 2011-12-31
2     B      2001-04-04 2011-12-29
3     C      2006-07-18 2010-12-08
4     D      2000-01-01 2006-12-31
5     E      2006-03-13 2008-11-04

我可以用这段代码绘制一个漂亮的情节:

ggplotly(
  ggplot(
    data = mydata,

aes(
  x = start_date,
  xend = end_date,
  y = category,
  yend = category, color = category
  )
      )+ geom_segment(size = 3) + xlab("Year") + ylab("Category") )

但是我的x轴并没有显示所有年份。这是上面代码生成的图:

Here is the plot produced by above code

当我尝试再添加一行代码(先删除一个括号)时:

 +
  scale_x_continuous(breaks = 
                       seq(as.Date("2000/1/1"), as.Date("2011/1/1"), "years") )

我收到了上述错误。

我也尝试过:

 +
  scale_x_continuous(breaks = cutoffs ))

截止日期是:

cutoffs = c('01-01-2000', '01-01-2001', '01-01-2002', '01-01-2003', '01-01-2004', '01-01-2005',
            '01-01-2006', '01-01-2007','01-01-2008','01-01-2009','01-01-2010','01-01-2011')
cutoffs = as.Date(cutoffs, format = '%d-%m-%Y')

我得到同样的错误。

非常感谢任何反馈。

0 个答案:

没有答案