<html>
  <head>
    <meta content="text/html; charset=ISO-8859-1"
      http-equiv="Content-Type">
  </head>
  <body text="#000000" bgcolor="#FFFFFF">
    Obrigado Luciano,<br>
    <br>
         Mas não era bem isso, pois o objeto final ficou no formato:<br>
    > dados2<br>
                   sp1       sp2       sp3       sp4       sp5      
    sp6       sp7       sp8<br>
    dossel    82.77001  82.77001  82.77001  82.77001  82.77001 
    82.77001  82.77001  82.77001<br>
    elevacao 727.85335 727.85335 727.85335 727.85335 727.85335 727.85335
    727.85335 727.85335<br>
    argila    47.28028  47.28028  47.28028  47.28028  47.28028 
    47.28028  47.28028  47.28028<br>
             500.00000 500.00000 500.00000 500.00000 500.00000 500.00000
    500.00000 500.00000<br>
    <br>
          E na verdade eu queria manter a estrutura de cada variável em
    uma coluna, sendo:<br>
    <br>
    > head(dados)<br>
      especie   dossel elevacao   argila presenca<br>
    1     sp1 70.63681 671.8686 58.47338        500<br>
    2     sp2 70.63681 671.8686 58.47338        500<br>
    3     sp3 70.63681 671.8686 58.47338        500<br>
    4     sp4 70.63681 671.8686 58.47338        500<br>
    5     sp5 70.63681 671.8686 58.47338        500<br>
    6     sp6 70.63681 671.8686 58.47338        500<br>
    <br>
    Obrigado,<br>
    <br>
    <br>
    <br>
    <br>
    <br>
    <br>
    <br>
    <br>
    <br>
    <div class="moz-cite-prefix">Em 12/03/2013 09:10, Luciano F. Sgarbi
      escreveu:<br>
    </div>
    <blockquote
cite="mid:CAJpKj8mjObStQaqf-4=zc6=K+FnRd5h0VNWbFoHPrMYda7W-UQ@mail.gmail.com"
      type="cite">
      <div dir="ltr">
        <div style="">é isso?</div>
        sapply(split(dados,dados$especie),function(x)
        a<-c(apply(x[,c(2:4)],2,mean),sum(x[,5])) )<br>
        <div><br>
        </div>
        <div style="">att,</div>
        <div style="">Luciano</div>
      </div>
      <div class="gmail_extra">
        <br>
        <br>
        <div class="gmail_quote">Em 12 de março de 2013 09:40, ASANTOS <span
            dir="ltr"><<a moz-do-not-send="true"
              href="mailto:alexandresantosbr@yahoo.com.br"
              target="_blank">alexandresantosbr@yahoo.com.br</a>></span>
          escreveu:<br>
          <blockquote class="gmail_quote" style="margin:0 0 0
            .8ex;border-left:1px #ccc solid;padding-left:1ex">
            Bom dia pessoal,<br>
            <br>
                     Estou tentando obter um novo objeto com alguns
            dados que sera ó resultado de várias operações, sendo:<br>
            <br>
            #<br>
            dados<-expand.grid(especie=c("sp1","sp2","sp3","sp4","sp5",<br>
            "sp6","sp7","sp8"),##8 espécies de inseto<br>
            dossel=rnorm(5,75,15), ## Cobertura de dossel<br>
            elevacao=rnorm(5,750,50),##Elevação do terreno<br>
            argila=rnorm(5,45,15),## Teor de argila<br>
            presenca=rbinom(5,1,0.6)) ## Presença ou ausência do inseto<br>
            #<br>
            <br>
                    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,<br>
            <br>
            Obrigado<br>
            <br>
            -- <br>
            ======================================================================<br>
            Alexandre dos Santos<br>
            Proteção Florestal<br>
            Coordenador do curso Técnico em Florestas<br>
            Vice Coordenador do curso de Engenharia Florestal<br>
            IFMT - Instituto Federal de Educação, Ciência e Tecnologia
            de Mato Grosso<br>
            Campus Cáceres<br>
            Caixa Postal 244<br>
            Avenida dos Ramires, s/n<br>
            Bairro: Distrito Industrial<br>
            Cáceres - MT                      CEP: 78.200-000<br>
            Fone: <a moz-do-not-send="true"
              href="tel:%28%2B55%29%2065%208132-8112"
              value="+556581328112" target="_blank">(+55) 65 8132-8112</a>
            (TIM)   <a moz-do-not-send="true"
              href="tel:%28%2B55%29%2065%209686-6970"
              value="+556596866970" target="_blank">(+55) 65 9686-6970</a>
            (VIVO)<br>
            <a moz-do-not-send="true"
              href="mailto:e-mails%3Aalexandresantosbr@yahoo.com.br"
              target="_blank">e-mails:alexandresantosbr@yahoo.com.br</a><br>
                    <a moz-do-not-send="true"
              href="mailto:alexandre.santos@cas.ifmt.edu.br"
              target="_blank">alexandre.santos@cas.ifmt.edu.br</a><br>
            ======================================================================<br>
            <br>
            _______________________________________________<br>
            R-br mailing list<br>
            <a moz-do-not-send="true"
              href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
            <a moz-do-not-send="true"
              href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br"
              target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
            Leia o guia de postagem (<a moz-do-not-send="true"
              href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>)
            e forneça código mínimo reproduzível.<br>
          </blockquote>
        </div>
        <br>
        <br clear="all">
        <div><br>
        </div>
        -- <br>
        <div><b
style="font-size:12.727272033691406px;color:rgb(34,34,34);font-family:arial,sans-serif;background-color:rgb(255,255,255)">Luciano
            F. Sgarbi</b><br>
          <br
style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:12.727272033691406px;background-color:rgb(255,255,255)">
          <span
style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:12.727272033691406px;background-color:rgb(255,255,255)">Mestrando
            em Ecologia e Evolução</span><br
style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:12.727272033691406px;background-color:rgb(255,255,255)">
          <span
style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:12.727272033691406px;background-color:rgb(255,255,255)">Laboratório
            de Ecologia de Insetos (sl. 222)</span><br
style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:12.727272033691406px;background-color:rgb(255,255,255)">
          <div
style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:12.727272033691406px;background-color:rgb(255,255,255)">Departamento
            de Ecologia<br>
            Instituto de Ciências Biológicas - ICB 1<br>
            Universidade Federal de Goiás, campus II<br>
            Goiânia-GO<br>
            74001-970</div>
          <div
style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:12.727272033691406px;background-color:rgb(255,255,255)">Brazil</div>
        </div>
        <div><br>
        </div>
        <div><br>
        </div>
      </div>
      <br>
      <fieldset class="mimeAttachmentHeader"></fieldset>
      <br>
      <pre wrap="">_______________________________________________
R-br mailing list
<a class="moz-txt-link-abbreviated" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a>
<a class="moz-txt-link-freetext" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
Leia o guia de postagem (<a class="moz-txt-link-freetext" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</pre>
    </blockquote>
    <br>
    <pre class="moz-signature" cols="72">-- 
======================================================================
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)
<a class="moz-txt-link-abbreviated" href="mailto:e-mails:alexandresantosbr@yahoo.com.br">e-mails:alexandresantosbr@yahoo.com.br</a> 
        <a class="moz-txt-link-abbreviated" href="mailto:alexandre.santos@cas.ifmt.edu.br">alexandre.santos@cas.ifmt.edu.br</a>                    
======================================================================
</pre>
  </body>
</html>