<html>
  <head>
    <meta content="text/html; charset=windows-1252"
      http-equiv="Content-Type">
  </head>
  <body bgcolor="#FFFFFF" text="#000000">
    Antes de mais nada,  muito obrigado Rodrigo Coster!<br>
    <br>
    <br>
    Não estou conseguindo.<br>
    <br>
    <br>
    > mydata<-read.csv2(choose.files(),header=FALSE)<br>
    ><br>
    > str(mydata)<br>
    'data.frame':   239 obs. of  1 variable:<br>
     $ V1: Factor w/ 239 levels "ABW","AFG","AGO",..: 1 2 3 4 5 6 7 8 9
    10 ...<br>
    > <br>
    > data<-expand.grid(mydata,mydata)<br>
    > <br>
    > data1<-data[data[,1] != data[,2],]<br>
    > <br>
    > data1<br>
    [1] Var1 Var2<br>
    <0 linhas> (ou row.names de comprimento 0)<br>
    > <br>
    > str(data1)<br>
    'data.frame':   0 obs. of  2 variables:<br>
     $ Var1:'data.frame':   0 obs. of  1 variable:<br>
      ..$ V1: Factor w/ 239 levels "ABW","AFG","AGO",..: <br>
     $ Var2:'data.frame':   0 obs. of  1 variable:<br>
      ..$ V1: Factor w/ 239 levels "ABW","AFG","AGO",..: <br>
     - attr(*, "out.attrs")=List of 2<br>
      ..$ dim     : int  1 1<br>
      ..$ dimnames:List of 2<br>
      .. ..$ Var1: chr "Var1=c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12,
    13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29,
    30, 31, 32, 3"| __truncated__<br>
      .. ..$ Var2: chr "Var2=c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12,
    13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29,
    30, 31, 32, 3"| __truncated__<br>
    > <br>
    <br>
    <br>
    <br>
    <br>
    <br>
    <div class="moz-cite-prefix">On 02/03/2015 15:47, Rodrigo Coster
      wrote:<br>
    </div>
    <blockquote
cite="mid:CAKU4woshgoHv7ULYt2MKq=Pujp7vWTht5_ED-4uusKh1igjDzA@mail.gmail.com"
      type="cite">
      <div dir="ltr">Pelo que eu entendi, tu quer todas combinações
        possíveis. Da para fazer com o expand.grid() e depois retirar as
        não desejadas (no caso, BRA BRA/FRA FRA/ARG ARG)
        <div><br>
        </div>
        <div>
          <div><font face="monospace, monospace">(vetor <- c('ARG',
              'BRA', 'FRA'))</font></div>
          <div><font face="monospace, monospace">(dados <-
              data.frame(expand.grid(vetor, vetor)))</font></div>
          <div><font face="monospace, monospace">(dados <-
              dados[dados[, 1] != dados[, 2], ])</font></div>
        </div>
        <div><br>
        </div>
        <div><br>
        </div>
      </div>
      <div class="gmail_extra"><br>
        <div class="gmail_quote">2015-03-02 15:42 GMT-03:00 Alexandre
          Loures <span dir="ltr"><<a moz-do-not-send="true"
              href="mailto:alexandre.loures@ymail.com" target="_blank">alexandre.loures@ymail.com</a>></span>:<br>
          <blockquote class="gmail_quote" style="margin:0 0 0
            .8ex;border-left:1px #ccc solid;padding-left:1ex">
            <div bgcolor="#FFFFFF" text="#000000"> Boa tarde!<br>
              <br>
              Tenho uma base cuja primeira coluna é a seguinte:<br>
              <br>
              ARG<br>
              BRA<br>
              FRA<br>
              <br>
              <br>
              A partir dessa primeira coluna gostaria de gerar a
              seguinte base<br>
              <br>
              <br>
              1ª COLUNA     2ª COLUNA<br>
                    ARG                  BRA<br>
                    ARG                  FRA<br>
                    BRA                  ARG<br>
                    BRA                  FRA<br>
                    FRA                  ARG<br>
                    FRA                  BRA<br>
              <br>
              <br>
              Alguém saberia me dizer como conseguir esse resultado?<br>
              <br>
              <br>
              <br>
              Desde já muito obrigado!<span class="HOEnZb"><font
                  color="#888888"><br>
                  <br>
                  <br>
                  <br>
                  <div>-- <br>
                    <font size="1"><b>Alexandre Rodrigues Loures</b><br>
                      Doutorando em Economia Aplicada<br>
                      Universidade Federal da Paraíba - UFPB<br>
                      Centro de Ciências Sociais Aplicadas - CCSA<br>
                      Programa de Pós-Graduação em Economia - PPGE<br>
                      e-Mail: <a moz-do-not-send="true"
                        href="mailto:alexandre.loures@ymail.com"
                        target="_blank">alexandre.loures@ymail.com</a><br>
                      Site: <a moz-do-not-send="true"
                        href="http://www.ccsa.ufpb.br/ppge"
                        target="_blank">www.ccsa.ufpb.br/ppge</a></font>
                  </div>
                </font></span></div>
            <br>
            _______________________________________________<br>
            R-br mailing list<br>
            <a moz-do-not-send="true"
              href="mailto:R-br@listas.c3sl.ufpr.br">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>
      </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>
    <div class="moz-signature">-- <br>
      <font size="1"><b>Alexandre Rodrigues Loures</b><br>
        Doutorando em Economia Aplicada<br>
        Universidade Federal da Paraíba - UFPB<br>
        Centro de Ciências Sociais Aplicadas - CCSA<br>
        Programa de Pós-Graduação em Economia - PPGE<br>
        e-Mail: <a class="moz-txt-link-abbreviated" href="mailto:alexandre.loures@ymail.com">alexandre.loures@ymail.com</a><br>
        Site: <a class="moz-txt-link-abbreviated" href="http://www.ccsa.ufpb.br/ppge">www.ccsa.ufpb.br/ppge</a></font>
    </div>
  </body>
</html>