Hola,
Otra alternativa que puedes utilizar es esta:
#--
grafico <- function(dt, varx) {
dt <- as.data.frame(dt)
p <- ggplot(dt, aes( x= Date, y= dt[,varx] ) )
p + geom_point()
## un montón de código de configuración del gráfico, etc
}
Usa aes_string en lugar de aes. Mira la documentación.
2017-04-28 23:39 GMT+02:00 Rubén Coca :
> Hola a todos,
> Partiendo de:
>
> library(ggplot2); library(data.table)
>
> datos <- data.table(Date = seq.Date(as.Date("2017-01-01"),
>
Hola a todos,
Partiendo de:
library(ggplot2); library(data.table)
datos <- data.table(Date = seq.Date(as.Date("2017-01-01"),
as.Date("2017-01-10"),
by = "day"),
V1 = rnorm(10),
V2 = rnorm(10))