[R-br] ddply - obter ganho de peso médio

[walmes .]

Isso pode ser feito de muitas formas, via muitos pacotes e funções. Dentre
tantas, uma possibilidade seria essa. Certamente não é a melhor mas serve.

str(GPD)

xtabs(~TRAT+ANIMAL, data=GPD)
xtabs(~DATA+ANIMAL, data=GPD)

require(reshape)
require(plyr)

db <- cast(data=GPD, ANIMAL~DATA, value="Pesos")

db$mGPD <- apply(db[,-1], MARGIN=1,
                 function(x){
                     mean(diff(na.omit(x)))
                 })

À disposição.
Walmes.
​
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150226/69e7e48b/attachment.html>