2010-11-30 92 views
4

X轴我电子保持我的日记,我试图让我如何保持一致一直跟我写日记,在过去几个月里的想法。我有以下的数据文件,这表明许多日记帐分录(Entry Count)和字(Word Count)我怎么录得超过前30天的期限。情节的日期与R

Date Entry Count Word Count 
2010-08-25 22 4205 
2010-08-26 21 4012 
2010-08-27 20 3865 
2010-08-28 20 4062 
2010-08-29 19 3938 
2010-08-30 18 3759 
2010-08-31 17 3564 
2010-09-01 17 3564 
2010-09-02 16 3444 
2010-09-03 17 3647 
2010-09-04 17 3617 
2010-09-05 16 3390 
2010-09-06 15 3251 
2010-09-07 15 3186 
2010-09-08 15 3186 
2010-09-09 16 3414 
2010-09-10 15 3228 
2010-09-11 14 3006 
2010-09-12 13 2769 
2010-09-13 13 2781 
2010-09-14 12 2637 
2010-09-15 13 2774 
2010-09-16 13 2808 
2010-09-17 12 2732 
2010-09-18 12 2664 
2010-09-19 13 2931 
2010-09-20 13 2751 
2010-09-21 13 2710 
2010-09-22 14 2950 
2010-09-23 14 2834 
2010-09-24 14 2834 
2010-09-25 14 2834 
2010-09-26 14 2834 
2010-09-27 14 2834 
2010-09-28 14 2543 
2010-09-29 14 2543 
2010-09-30 15 2884 
2010-10-01 16 3105 
2010-10-02 16 3105 
2010-10-03 16 3105 
2010-10-04 15 2902 
2010-10-05 14 2805 
2010-10-06 14 2805 
2010-10-07 14 2805 
2010-10-08 14 2812 
2010-10-09 15 2895 
2010-10-10 14 2667 
2010-10-11 15 2876 
2010-10-12 16 2938 
2010-10-13 17 3112 
2010-10-14 16 2894 
2010-10-15 16 2894 
2010-10-16 16 2923 
2010-10-17 15 2722 
2010-10-18 15 2722 
2010-10-19 14 2544 
2010-10-20 13 2277 
2010-10-21 13 2329 
2010-10-22 12 2132 
2010-10-23 11 1892 
2010-10-24 10 1764 
2010-10-25 10 1764 
2010-10-26 10 1764 
2010-10-27 10 1764 
2010-10-28 10 1764 
2010-10-29 9 1670 
2010-10-30 10 1969 
2010-10-31 10 1709 
2010-11-01 10 1624 
2010-11-02 11 1677 
2010-11-03 11 1677 
2010-11-04 11 1677 
2010-11-05 11 1677 
2010-11-06 12 1786 
2010-11-07 12 1786 
2010-11-08 11 1529 
2010-11-09 10 1446 
2010-11-10 11 1682 
2010-11-11 11 1540 
2010-11-12 11 1673 
2010-11-13 11 1765 
2010-11-14 12 1924 
2010-11-15 13 2276 
2010-11-16 12 2110 
2010-11-17 13 2524 
2010-11-18 14 2615 
2010-11-19 14 2615 
2010-11-20 15 2706 
2010-11-21 14 2549 
2010-11-22 15 2647 
2010-11-23 16 2874 
2010-11-24 16 2874 
2010-11-25 16 2874 
2010-11-26 17 3249 
2010-11-27 18 3421 
2010-11-28 18 3421 
2010-11-29 19 3647 

我试图用R来绘制这些数据以获得我的日记写入一致性的图形表示。我用下面的命令将它加载到R中。

d <- read.table("journal.txt", header=T, sep="\t") 

然后我可以使用以下命令绘制数据图。

plot(seq(from=1, to=length(d$Entry.Count), by=1), d$Entry.Count, type="o", ylim=c(0, max(d$Entry.Count))) 

但是,在这个图中,X轴只是一个数字,而不是日期。我试着调整命令,像这样在X轴上显示日期。

plot(d$Date, d$Entry.Count, type="o", ylim=c(0, max(d$Entry.Count))) 

但是,不仅情节看起来很奇怪,而且X轴上的标签也不是很有帮助。绘制这些数据的最佳方法是什么,以便我可以清楚地将日期与绘制曲线上的点关联起来?

回答

2

你可以使用zoo?plot.zoo有几个如何创建自定义轴标签的例子。

z <- zoo(d[,-1],as.Date(d[,1])) 
plot(z) 

# Example of custom axis labels 
plot(z$Entry.Count, screen = 1, col = 1:2, xaxt = "n") 
ix <- seq(1, length(time(z)), 3) 
axis(1, at = time(z)[ix], labels = format(time(z)[ix],"%b-%d"), cex.axis = 0.7) 
+0

对象`tt`从哪里来? – 2010-11-30 18:24:33

5

基于您的代码的日期都只是个字符。

尝试将它们转换为日期:

plot(as.Date(d$Date), d$Entry.Count) 

你的情况为 “%Y-%间%d” 的格式很简单是as.Date默认。请参阅strptime获取更多一般选项。

+0

很简单,乐于助人。谢谢! – 2010-11-30 22:18:23