[R-es] Media en subgrupos de grupos

Hola,

Hemos respondido hace poco a una consulta parecida.
Jorge comenta todas las funciones *ply y yo suelo responder con un ejemplo
del paquete "sqldf"...
Que con un poco de conocimiento de sql es inmediato poder utilizarlo.

Ahí va el ejemplo:

library(sqldf)>  >  Lines<- "DeployID Date.Time LocationQuality Latitude Longitude+ STM05-1 2005/02/28 17:35 Good -35.562 177.158+ STM05-1 2005/02/28 19:44 Good -35.487 177.129+ STM05-1 2005/02/28 23:01 Unknown -35.399 177.064+ STM05-1 2005/03/01 07:28 Unknown -34.978 177.268+ STM05-1 2005/03/01 18:06 Poor -34.799 177.027+ STM05-1 2005/03/01 18:47 Poor -34.85 177.059+ STM05-2 2005/02/28 12:49 Good -35.928 177.328+ STM05-2 2005/02/28 21:23 Poor -35.926 177.314+ ">  >  DF<- read.table(textConnection(Lines), skip = 1,  as.is = TRUE,+                  col.names = c("Id", "Date", "Time", "Quality", "Lat", "Long"))>  sqldf("select Quality, avg(Lat), avg(Long) from DF group by Quality")  Quality  avg(Lat) avg(Long)

1    Good -35.65900  177.2050
2    Poor -35.19167  177.1333
3 Unknown -35.18850  177.1660>  >


Cuidado que sqldf trabaja sobre "data.frames" cuyo nombre no tenga un
punto, por eso en el ejemplo se usa "DF".

Saludos,
Carlos Ortega
www.qualityexcellence.es


El 25 de enero de 2012 21:11, Jesus Armand Calejero Roman<
ana.ismi.3isa en gmail.com>  escribió:

Un saludo a todos.

Es posible que con el asunto no quede claro lo que quiero. Para eso añado
una captura.

Dispongo de 3 variables (dos discretas y una continua) y me interesaría
sacar la media tanto del grupo como de los subgrupos. Esta creo que es la
segunda vez que escribo preguntando algo parecido. En la primera me
hablasteis de tapply, pero con este comando sólo sé obtener la media de una
de las variables, por ejemplo la media de edad de los grupos de la variable
Franja o de la variable Sexo pero no de los dos a la vez como en la tabla
dinámica que acompaña a los datos en la captura. Aggregate no me queda muy
claro qué es lo que hace.

Espero no volver a ser de mucha molestia.

Muchas gracias de antemano

	[[alternative HTML version deleted]]