<font face="trebuchet ms,sans-serif">Dê uma olhada na função split() também.<br><br>À disposição.<br>Walmes.<br><br clear="all"></font><span style="font-family: trebuchet ms,sans-serif;">==========================================================================</span><br style="font-family: trebuchet ms,sans-serif;">
<span style="font-family: trebuchet ms,sans-serif;">Walmes Marques Zeviani</span><br style="font-family: trebuchet ms,sans-serif;"><span style="font-family: trebuchet ms,sans-serif;">LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)</span><br style="font-family: trebuchet ms,sans-serif;">
<span style="font-family: trebuchet ms,sans-serif;">Departamento de Estatística - Universidade Federal do Paraná</span><br style="font-family: trebuchet ms,sans-serif;"><span style="font-family: trebuchet ms,sans-serif;">fone: (+55) 41 3361 3573</span><br style="font-family: trebuchet ms,sans-serif;">
<span style="font-family: trebuchet ms,sans-serif;">VoIP: (3361 3600) 1053 1173</span><br style="font-family: trebuchet ms,sans-serif;"><span style="font-family: trebuchet ms,sans-serif;">e-mail: <a href="mailto:walmes@ufpr.br" target="_blank">walmes@ufpr.br</a></span><br style="font-family: trebuchet ms,sans-serif;">
<span style="font-family: trebuchet ms,sans-serif;">twitter: @walmeszeviani</span><br style="font-family: trebuchet ms,sans-serif;"><span style="font-family: trebuchet ms,sans-serif;">homepage: <a href="http://www.leg.ufpr.br/%7Ewalmes" target="_blank">http://www.leg.ufpr.br/~walmes</a></span><br style="font-family: trebuchet ms,sans-serif;">
<span style="font-family: trebuchet ms,sans-serif;">linux user number: 531218</span><br style="font-family: trebuchet ms,sans-serif;"><span style="font-family: trebuchet ms,sans-serif;">==========================================================================</span><br>

<br><br><div class="gmail_quote">2011/6/2 Luciano Ramos Gonçalves <span dir="ltr"><<a href="mailto:lrg.financas@gmail.com">lrg.financas@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">


  
    
  
  <div text="#000000" bgcolor="#ffffff">
    Funcionou. Eu estava comandando corretamente. O problema era no
    valor procurado.<br>
    Obrigado pela ajuda a você e ao Ivan Allaman.<br>
    <br>
    Luciano.<br>
    <br>
    Em 6/2/2011 12:57 PM, Paulo Justiniano escreveu:
    <blockquote type="cite"><div><div></div><div class="h5">A seleção pode ter critérios multiplos, portanto
      <br>
      <br>
      dat[dat$V1=="AAA" & dat$V2 == "AAA", ]
      <br>
      vai funcionar
      <br>
      <br>
      em cima deste fato voce pode usar outras funcoes ou mesmo dentro
      de um loop.
      <br>
      O comando acima é equivalente a
      <br>
      <br>
      subset(dat, V1 == "AAA" & V2 == "AAA")
      <br>
      <br>
      um codigo (nao muito otimizado por usar loop duplo...) seria:
      <br>
      <br>
      for (i in levels(dat$V1)){
      <br>
        for (j in levels(dat$V2)){
      <br>
          sub <- subset(dat, V1==i & V2 == j)
      <br>
          sink(paste(i, "-", j, ".txt", sep=T)
      <br>
          sub
      <br>
          sink()
      <br>
      }}
      <br>
      <br>
      ou talvez trocar sink() por write.table
      <br>
      <br>
      Agora, uma alternativa seria:
      <br>
      <br>
      by(dat, list(dat$V1, dat$V2), FUN=function(x){ x})
      <br>
      <br>
      onde em voce escreveria a função para gravar os arquivos
      <br>
      <br>
      veja a saida do comandop acima para os seguintes dados:
      <br>
      <br>
      dat <- data.frame(V1 = factor(sample(LETTERS[1:3], 10, rep=T)),
      V2 = factor(sample(letters[1:3], 10, rep=T)), 1:10)
      <br>
      <br>
      <br>
      <br>
      <br>
      <br>
      On Thu, 2 Jun 2011, Luciano Ramos Gonçalves wrote:
      <br>
      <br>
      <blockquote type="cite">Tenho um  arquivo com 11 colunas.
        <br>
        A coluna 2 (V2) tem aproximadamente 300 levels. O que eu
        pretendo é separar todo o arquivo conforme esses leveis.
        <br>
        Ou seja, sendo o level 1 "AAA", eu quero extrair todas as linhas
        cujo valor na segunda coluna seja "AAA" e gravar em
        <br>
        um novo arquivo, usando "sink()" por exemplo.
        <br>
        Como selecionar as linhas conforme o valor do level da segunda
        coluna?
        <br>
        <br>
        Grato,
        <br>
        <br>
        Luciano.
        <br>
        <br>
        <br>
      </blockquote>
      </div></div><pre><fieldset></fieldset>
_______________________________________________
R-br mailing list
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a>
<a 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>
</pre>
    </blockquote>
    <br>
  </div>

<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a 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>
<br></blockquote></div><br>