[R-es] Problema con el subset

[Igor Sosa Mayor]

Jose Manuel Veiga del Baño <chemavb en um.es>
writes:

> Hola a todos,
>
> Agradeceros de antemano vuestro tiempo y paciencia ya que soy un poco
> novato y tal vez esto sea un poco trivial. 
>
> Lo que quiero hacer es que me represente en eje de las x las fechas
> (columna fecha) y los valores de z (columna z) pero de los datos que
> he filtrado antes en (dfgrupo<-subset
> (df,df$parametroslaboratorio=="Aflatoxinas ByG")) y que los parámetros
> iguales (variables de la columna param) se unan entre sí y tengan un
> color cada param. En principio estoy usando un código de un ejemplo
> que funciona muy bien pero lo único que consigo es que se me unan
> todos los puntos (todos los parm) y que no lo haga por colores. 
>
> Si alguien se le ocurre algo se lo agradezco.
>
> df <- read.table(file="xxxx.csv", header=T, sep=";", dec=",")
> df <-na.omit(df)
> dfgrupo<-subset(df,df$parametroslaboratorio=="Aflatoxinas ByG")
> niveles <- as.numeric(dfgrupo$param)
> ntrees <- max(niveles) 
> xrange <- range(as.Date(dfgrupo$fecha))
> yrange <- range(dfgrupo$z)
> plot(xrange, yrange, type = "n", xlab = "Fecha del interlaboratorio", 
> ylab = "Z-score")
> colors <- rainbow(ntrees)
> ltipo <- c(1:ntrees)
> char <- seq(18, 18 + ntrees, 1)
> # Añadir las lineas al grafico
> for (i in 1:ntrees) {
> tree <- dfgrupo[ dfgrupo$param == levels( dfinter$param )[ i ], ] 
> lines(as.Date(dfgrupo$fecha), dfgrupo$z, type = "b", lwd = 1.5, 
> col = colors[i], pch = char[i])

mirando el código así un poco rápido... ¿eso de

> lines(as.Date(dfgrupo$fecha), dfgrupo$z, type = "b", lwd = 1.5, 
> col = colors[i], pch = char[i])

¿no tendría que ser?
lines(as.Date(dfgrupo$fecha), tree, type = "b", lwd = 1.5, 
col = colors[i], pch = char[i])

Saludos,

-- 
:: Igor Sosa Mayor     :: joseleopoldo1792 en gmail.com ::
:: GnuPG: 0x1C1E2890   :: http://www.gnupg.org/      ::
:: jabberid: rogorido  ::                            ::