通过R中的选择数据绘制数据

时间:2015-04-24 10:36:50

标签: r ggplot2

我有一个庞大的国家/地区规模流量站数据集,如表中所示。我在R语言方面的经验是初学者。

" CODE"表示流流站名称和

" VAL"以m ^ 3 / sec为单位的streaflow值。

每个电台的所有时间序列均为1/1/2002至2012年12月31日。

数据样本 enter image description here

我想通过选择特定的" 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"))

Result

1 个答案:

答案 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",因为轴标签难以阅读。