我怎样才能在R中制作这个情节? xlim和日期问题

时间:2014-05-20 12:57:06

标签: r date plot cumsum

首先,我要感谢你的关注。这就是我的问题:

我有一个数据框,这是它的结构(我删除了一些行):

DATE          PRODUCT      ORIGIN
11/03/2013      FV         Turkey
11/03/2013      BMPT       Turkey
12/03/2013      FV        Hong Kong
12/03/2013      HAS        Spain
12/03/2013      NNPS       Turkey
13/03/2013      MAMP       Poland
13/03/2013      PDAS       Italy
13/03/2013      FV         Tunisia
13/03/2013      FV         Turkey
13/03/2013      PMPMP      Belgium
14/03/2013      MAMP       France
14/03/2013      MAMP       Poland
14/03/2013      MAMP       France
15/03/2013      NNPS       United Kingdom

我想制作一个类似于此的情节: enter image description here

为此,我在R:

中执行此代码
cs<-cumsum(table(dataset$DATE))
plot(cs,type="l",col="blue",ylab="Number of cases")

问题是我希望日期出现在xlim而不是#34; Index&#34;。我查看了cumsum的作用:

11/03/2013 12/03/2013 13/03/2013 14/03/2013 15/03/2013 18/03/2013 19/03/2013 
    11         18         30         43         59         80         96 
20/03/2013 21/03/2013 22/03/2013 25/03/2013 26/03/2013 27/03/2013 
   108        116        132        146        160        164 

个案数目:164(累积)11/03/2013 - &gt; 11,12 / 03 / 2013-&gt; 7等等

我试过了:

axis(1, at=1:length(unique(dataset$DATE)), labels=unique(dataset$DATE))

但我得到了这个,我仍然看到&#34;索引&#34;: enter image description here

有没有办法在xlim上创建Dates的累积图?

我希望你能理解这个问题。如果没有,请告诉我。非常感谢!

1 个答案:

答案 0 :(得分:0)

这似乎有效:

plot(cs, type = "l", xaxt = "n", col = "blue", ylab = "Number of cases", xlab = "Date")
axis(1, at = seq_along(cs), labels = names(cs))

enter image description here