Hola,

Con la librería sqldf es bastante inmediato:

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 Date, avg(Lat), avg(Long) from DF group by Date")        Date  avg(Lat) avg(Long)
1 2005/02/28 -35.66040  177.1986
2 2005/03/01 -34.87567  177.1180

>
Al margen queda el sinsentido de la media de una Longitud o Latitud... :-).

Saludos,
Carlos Ortega
www.qualityexcellence.es


Saludos,
Carlos Ortega
www.qualityexcellence

El 19 de enero de 2012 22:26, Otto F. Wagner <ofwagner@gmail.com> escribió:

> *Hola!!! resulta que tengo unos datos de divisas ordenados por fechas
> (días) los que he convertido a formato tipo YYYY-MM-DD donde DD siempre es
> 01:*
> *
> *
> *
> EUR.resto$date<-as.Date(EUR.resto$date)
>
> EUR.resto$mo <- substr(EUR.resto$date,6,7)
> EUR.resto$yr <- substr(EUR.resto$date, 1,4)
>
>
> EUR.resto$month<-paste('01-',EUR.resto$mo,'-',EUR.resto$yr,sep='')
> EUR.resto$month<-as.Date(EUR.resto$month)
>
>
> ahora necesito agrupar mis datos por mes-años (01-mes-año) y obtener su
> valor medio.  En SAS haría un proc summary donde obtendría una nueva tabla
> con menos registros ya que estarían agrupados por mes.  Que función en R
> puedo usar equivalente a esta?
>
> Si uso: eur.agg<-aggregate(EUR.resto$Yenes.japoneses.por.Euro,
> by=list(EUR.resto$month),FUN=mean) me da error.
>
> Gracias por vuestra ayuda,
>
> un saludo,
>
> Otto
> *
>
>        [[alternative HTML version deleted]]
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>

	[[alternative HTML version deleted]]

