在成功(在您的帮助下)在单个(一个变量)图表中绘制气象变量之后,我尝试在单个面板中生成一个面板,其中包含数据中不同变量的时间序列,例如ggplot2 网页示例 http://had.co.nz/ggplot2/graphics/101cff73afa0b4267d7e015d09da5cde.png。我尝试过重现那个例子 http://had.co.nz/ggplot2/scale_date.html(页面底部的最后一张图)使用我的数据但没有成功
我的数据跨越了几年,但我只附上了一个月的数据。您可以在以下位置查看 dput(datos) 的输出http://ubuntuone.com/42j1RqUmNmxUuCppW4gElX http://ubuntuone.com/42j1RqUmNmxUuCppW4gElX
这是我正在尝试的代码
datos=read.csv("paterna.dat",sep=";",header=T,na.strings="-99.9")
dm=melt(datos,id="FECHA.H_SOLAR")
datos$PRECIP[is.na(datos$PRECIP)]=0
dm=melt(datos,id="FECHA.H_SOLAR")
qplot(date, value, data = dm, geom = "line", group = variable) + facet_grid(variable ~ ., scale = "free_y")
Error: geom_line requires the following missing aesthetics: x
Además: Mensajes de aviso perdidos
1: In min(x) : ningún argumento finito para min; retornando Inf
2: In max(x) : ningun argumento finito para max; retornando -Inf
我尝试使用 qplot,因为它出现在引用的示例中,但也许最好使用 ggplot 并设置美观性。然后我还可以自定义轴。
提前致谢
这个问题是双重的。首先没有date
熔化物内的物体data.frame
,这会给您错误消息。其次,你的FECHA.H_SOLAR
是一个难以正确绘制日期的因素。所以这是我的解决方案:
datos <- source("http://ubuntuone.com/42j1RqUmNmxUuCppW4gElX")[[1]]
library(reshape2)
library(ggplot2)
datos$PRECIP[is.na(datos$PRECIP)] <- 0
dm <- melt(datos,id="FECHA.H_SOLAR")
# change FECHA.H_SOLAR to POSIXct so you get your dates right
dm$Fecha <- as.POSIXct(dm$FECHA.H_SOLAR, "%y/%m/%d %H:%M:%S", tz = "")
qplot(Fecha, value, data = dm, geom = "line", group = variable) +
facet_grid(variable ~ ., scale = "free_y")
希望能帮助到你
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)