我有一个庞大的国家/地区规模流量站数据集,如表中所示。我在R语言方面的经验是初学者。
" CODE"表示流流站名称和
" VAL"以m ^ 3 / sec为单位的streaflow值。
每个电台的所有时间序列均为1/1/2002至2012年12月31日。
数据样本
我想通过选择特定的" CODE"来绘制。从整个时间序列中查看整个时间序列的线图格式,并作为第二步,以boxplot格式查看该站的月度分析。 没有颜色或其他绘图效果。
/编辑
我迄今为止尝试的是以下脚本
library("gdata")
library("ggplot2")
timeseries <- read.csv("C:\\Users\\G\\Documents\\R\\Projects\\...\\...\\....csv", header = T)
summary(timeseries)
plot(timeseries$VAL ~ timeseries$CODE, col="light blue", pch = 19 , srt=45)
ggplot(table) + geom_point(aes(x= DATE[1:4017], y = VAL [1:4017]))
我为第一个情节的所有电台拍了一个复合箱图
并且ggplot没有工作
// scoa解决方案后的最终编辑号
library("gdata")
library("scales")
library("ggplot2")
timeseries<- read.csv("C:\\Users\\G\\Documents\\R\\Projects\\...\\...\\......csv", header = T)
timeseries$DATE <- as.Date(as.character( timeseries$DATE),format = "%d/%m/%Y")
ggplot(data= timeseries[timeseries$CODE == "StationA",]) + geom_point(aes(x= DATE, y = VAL)) + scale_x_date(breaks= date_breaks("1 month"))
答案 0 :(得分:1)
您应该将data.frame
放在data
而不是aes
中,确保DATE
变量的格式正确,并使用scale_x_datetime()
。< / p>
timeseries$DATE <- as.Date(as.character(timeseries$DATE),format = "%d/%m/%Y")
library(scales)
ggplot(data=timeseries[timeseries$CODE == "a",]) +
geom_point(aes(x= DATE, y = VAL)) +
scale_x_date(breaks= date_breaks("1 month"))
您可能希望将date_breaks()
的默认值更改为"3 months"
或"6 months"
,因为轴标签难以阅读。