[R-br] Criar objeto com operações distintas

[Luciano F. Sgarbi]

você pode usar t() com o resultado do comando que eu te mandei,
outra opção é:
do.call(rbind,lapply(split(dados,dados$especie),function(x)
a<-c(apply(x[,c(2:4)],2,mean),sum(x[,5])) ))

pode ser isso?
att,
Luciano


Em 12 de março de 2013 13:06, ASANTOS <alexandresantosbr em yahoo.com.br>escreveu:

>  Obrigado Luciano,
>
>      Mas não era bem isso, pois o objeto final ficou no formato:
> > dados2
>                sp1       sp2       sp3       sp4       sp5       sp6
> sp7       sp8
> dossel    82.77001  82.77001  82.77001  82.77001  82.77001  82.77001
> 82.77001  82.77001
> elevacao 727.85335 727.85335 727.85335 727.85335 727.85335 727.85335
> 727.85335 727.85335
> argila    47.28028  47.28028  47.28028  47.28028  47.28028  47.28028
> 47.28028  47.28028
>          500.00000 500.00000 500.00000 500.00000 500.00000 500.00000
> 500.00000 500.00000
>
>       E na verdade eu queria manter a estrutura de cada variável em uma
> coluna, sendo:
>
> > head(dados)
>   especie   dossel elevacao   argila presenca
> 1     sp1 70.63681 671.8686 58.47338        500
> 2     sp2 70.63681 671.8686 58.47338        500
> 3     sp3 70.63681 671.8686 58.47338        500
> 4     sp4 70.63681 671.8686 58.47338        500
> 5     sp5 70.63681 671.8686 58.47338        500
> 6     sp6 70.63681 671.8686 58.47338        500
>
> Obrigado,
>
>
>
>
>
>
>
>
>
> Em 12/03/2013 09:10, Luciano F. Sgarbi escreveu:
>
>  é isso?
> sapply(split(dados,dados$especie),function(x)
> a<-c(apply(x[,c(2:4)],2,mean),sum(x[,5])) )
>
>  att,
> Luciano
>
>
> Em 12 de março de 2013 09:40, ASANTOS <alexandresantosbr em yahoo.com.br>escreveu:
>
>> Bom dia pessoal,
>>
>>          Estou tentando obter um novo objeto com alguns dados que sera ó
>> resultado de várias operações, sendo:
>>
>> #
>> dados<-expand.grid(especie=c("sp1","sp2","sp3","sp4","sp5",
>> "sp6","sp7","sp8"),##8 espécies de inseto
>> dossel=rnorm(5,75,15), ## Cobertura de dossel
>> elevacao=rnorm(5,750,50),##Elevação do terreno
>> argila=rnorm(5,45,15),## Teor de argila
>> presenca=rbinom(5,1,0.6)) ## Presença ou ausência do inseto
>> #
>>
>>         Gostaria de explicitar que a cada variação em dados$especie,
>> fosse realizado a soma de dados$presenca e a média de dados$dossel,
>> dados$elevacao e dados$argila, na criação do novo objeto, mas com o comando
>> tapply(), não estou tendo sucesso em uma única linha de comando, alguém
>> teria alguma sugestão para fazer esta operação de maneira direta,
>>
>> Obrigado
>>
>> --
>> ======================================================================
>> Alexandre dos Santos
>> Proteção Florestal
>> Coordenador do curso Técnico em Florestas
>> Vice Coordenador do curso de Engenharia Florestal
>> IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
>> Campus Cáceres
>> Caixa Postal 244
>> Avenida dos Ramires, s/n
>> Bairro: Distrito Industrial
>> Cáceres - MT                      CEP: 78.200-000
>> Fone: (+55) 65 8132-8112 (TIM)   (+55) 65 9686-6970 (VIVO)
>> e-mails:alexandresantosbr em yahoo.com.br
>>         alexandre.santos em cas.ifmt.edu.br
>> ======================================================================
>>
>> _______________________________________________
>> R-br mailing list
>> R-br em listas.c3sl.ufpr.br
>> 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.
>>
>
>
>
>  --
> *Luciano F. Sgarbi*
>
> Mestrando em Ecologia e Evolução
> Laboratório de Ecologia de Insetos (sl. 222)
> Departamento de Ecologia
> Instituto de Ciências Biológicas - ICB 1
> Universidade Federal de Goiás, campus II
> Goiânia-GO
> 74001-970
> Brazil
>
>
>
>
> _______________________________________________
> R-br mailing listR-br em listas.c3sl.ufpr.brhttps://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.
>
>
> --
> ======================================================================
> Alexandre dos Santos
> Proteção Florestal
> Coordenador do curso Técnico em Florestas
> Vice Coordenador do curso de Engenharia Florestal
> IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
> Campus Cáceres
> Caixa Postal 244
> Avenida dos Ramires, s/n
> Bairro: Distrito Industrial
> Cáceres - MT                      CEP: 78.200-000
> Fone: (+55) 65 8132-8112 (TIM)   (+55) 65 9686-6970 (VIVO)e-mails:alexandresantosbr em yahoo.com.br
>         alexandre.santos em cas.ifmt.edu.br
> ======================================================================
>
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> 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.
>



-- 

*Luciano F. Sgarbi*

Mestrando em Ecologia e Evolução
Laboratório de Ecologia de Insetos (sl. 222)
Departamento de Ecologia
Instituto de Ciências Biológicas - ICB 1
Universidade Federal de Goiás, campus II
Goiânia-GO
74001-970
Brazil
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130312/7a1b721c/attachment.html>