在成功(在你的帮助下)绘制单个(一个变量)图形中的meteo变量之后,我试图在单个面板中生成一个包含我的数据中不同变量的时间序列的面板,就像ggplot2网页示例中的那个.我试图用我的数据重现该示例(页面底部的最后一个图形),但没有成功
我的数据已经持续了好几年,但我只附了一个月.您可以在http://ubuntuone.com/42j1RqUmNmxUuCppW4gElX上查看dput(datos)的输出
这是我正在尝试的代码
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并设置美学.然后我也可以自定义轴.
提前致谢
我正在使用ggplot来绘制一些数据,我注意到传说文本很长并且不适合窗口.
+ opts(legend.position = 'bottom', legend.direction = 'horizontal', size=0.1) +
guides(colour = guide_legend(nrow = 3), size=1)
ggplot中是否有一个选项可以包含图例文本以适合窗口.
我正在尝试用来dplyr整理数据集.我想要更改的列有一个字符串,它实际上是一个双精度数字,而不是小数点.到目前为止我得到了这个:
presupuesto_2016 <- read_csv( "http://datos.gob.ar/dataset/89f1a2dd-ad79-4211-87b4-44661d81ac0d/resource/84e23782-7d52-4724-a4ba-2f9621fa5f4e/download/presupuesto-2016.csv")
names(presupuesto_2016) <- str_replace(names(presupuesto_2016), "\uFEFF", "")
presupuesto_2016 %>%
mutate_at(starts_with("monto_"),
str_replace, pattern = ",", replacement = "\\.") %>%
mutate_at(starts_with("monto_"), funs(as.numeric))
但是这设法将每列更改为数字.我在这做错了什么？
我正在尝试使用ddply来创建一个函数.但是我不能上班.这是一个复制我得到的虚拟例子.这有什么可以做这个bug吗？
library(ggplot2)
data(diamonds)
foo <- function(data, fac1, fac2, bar) {
res <- ddply(data, .(fac1, fac2), mean(bar))
res
}
foo(diamonds, "color", "cut", "price")