我有三年的燃气表读数,我试图在R中绘图,以突出一年中几个月的日常使用量变化,并比较不同年份的使用情况.
数据样本:
Date,Gas
02/01/2010,4460.9
13/01/2010,4543
04/02/2010,4656
16/02/2010,4733
07/03/2010,4842
26/03/2010,4933.8
我可以从周期性读数计算平均每日使用量,并将几年内的整个数据绘制为单个数据系列:
A <- read.table("energy.csv", header=TRUE, fill=TRUE, sep=',')
A$Dates <- as.Date(A$Date, format="%d/%m/%Y")
for (j in 2:length(A$Gas)) {
A$GasDiff[j-1] = A$Gas[j] - A$Gas[j-1]
}
plot(A$Dates, A$GasDiff, type="o", lty=1, pch=20, ylab="Daily Consumption",
main="Gas Consumption")
但我无法弄清楚如何让R自动将数据拆分成不同的帧？每年,我可以为每年绘制单独的行.我可以用每年的数据手动创建不同的输入文件,但它不够优雅,并且需要每年更改代码.
我确定这是一个简单的问题,但我盯着手册,无法弄清楚.