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 <[email protected]
<mailto:[email protected]>> 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 <tel:%28%2B55%29%2065%208132-8112> (TIM)
(+55) 65 9686-6970 <tel:%28%2B55%29%2065%209686-6970> (VIVO)
e-mails:[email protected]
<mailto:e-mails%[email protected]>
[email protected]
<mailto:[email protected]>
======================================================================
_______________________________________________
R-br mailing list
[email protected] <mailto:[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.
--
*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 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.
--
======================================================================
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:[email protected]
[email protected]
======================================================================
_______________________________________________
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.
