Uma for mais simples, sem chamar o reshape e na linha do que você estava
imaginando, seria
require(plyr)
## Ordenar para assegurar ordem cronológica.
da <- arrange(GPD, ANIMAL, DATA)
str(da)
f <- function(x){
mean(diff(na.omit(x)))
}
ddply(da, .(ANIMAL), summarise, mGPD=f(Pesos))
À disposição.
Walmes.
_______________________________________________
R-br mailing list
[email protected]
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código
mínimo reproduzível.
