Obrigado mais uma vez Benilton!<br><br><div class="gmail_quote">Em 18 de abril de 2012 11:00, Benilton Carvalho <span dir="ltr"><<a href="mailto:beniltoncarvalho@gmail.com">beniltoncarvalho@gmail.com</a>></span> escreveu:<br>
<blockquote style="margin:0px 0px 0px 0.8ex;padding-left:1ex;border-left-color:rgb(204,204,204);border-left-width:1px;border-left-style:solid" class="gmail_quote">por sinal, usando sua tentativa inicial, eu faria simplesmente:<br>

<br>
with(tmp, gsub('NA', '', paste(x,y,z, sep='')))<br>
<br>
b<br>
<br>
2012/4/18 Benilton Carvalho <<a href="mailto:beniltoncarvalho@gmail.com">beniltoncarvalho@gmail.com</a>>:<br>
<div class="HOEnZb"><div class="h5">> tmp = data.frame(x=c('A1', NA, 'A2', NA, 'A3', NA, NA),<br>
> y=c(NA, NA, NA, 'A4', NA, 'A5', NA),<br>
> z=c(NA, 'A6', NA, NA, NA, NA, 'A7'), stringsAsFactors=FALSE)<br>
> tmp[<a href="http://is.na" target="_blank">is.na</a>(tmp)]=''<br>
> apply(tmp, 1, paste, collapse='', sep='')<br>
><br>
><br>
> 2012/4/18 Sérgio Henrique almeida da silva ju <<a href="mailto:sergio.edfisica@gmail.com">sergio.edfisica@gmail.com</a>>:<br>
>> Olá<br>
>><br>
>> Estou tentando agregar três colunas em uma, porém quando faço isso os NAs<br>
>> também se agregam, como faço para descosiderá-los<br>
>><br>
>> Ex:<br>
>><br>
>> # Dados<br>
>><br>
>> tmp = data.frame(x=c('A1', NA, 'A2', NA, 'A3', NA, NA),<br>
>> y=c(NA, NA, NA, 'A4', NA, 'A5', NA),<br>
>> z=c(NA, 'A6', NA, NA, NA, NA, 'A7'))<br>
>><br>
>> # Agregando com o PASTE<br>
>><br>
>> tmp$W <-paste(tmp$x,tmp$y,tmp$z, sep = "")<br>
>><br>
>> # Como os dados ficam<br>
>> dput(tmp)<br>
>><br>
>> structure(list(x = structure(c(1L, NA, 2L, NA, 3L, NA, NA), .Label = c("A1",<br>
>> "A2", "A3"), class = "factor"), y = structure(c(NA, NA, NA, 1L,<br>
>> NA, 2L, NA), .Label = c("A4", "A5"), class = "factor"), z = structure(c(NA,<br>
>> 1L, NA, NA, NA, NA, 2L), .Label = c("A6", "A7"), class = "factor"),<br>
>>     W = c("A1NANA", "NANAA6", "A2NANA", "NAA4NA", "A3NANA", "NAA5NA",<br>
>>     "NANAA7")), .Names = c("x", "y", "z", "W"), row.names = c(NA,<br>
>> -7L), class = "data.frame")<br>
>><br>
>> # Gostaria que minha coluna W ficasse assim e não como acima:<br>
>><br>
>> W = c("A1", "A6", "A2", "A4", "A3", "A5", "A7")<br>
>><br>
>> Como faço<br>
>><br>
>><br>
>> Abraços<br>
>><br>
>><br>
>><br>
>> --<br>
>> Sérgio Henrique Almeida da Silva Junior<br>
>> Doutorando em Epidemiologia em Saúde Pública<br>
>> Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ<br>
>> <a href="http://lattes.cnpq.br/1611345552843383" target="_blank">http://lattes.cnpq.br/1611345552843383</a><br>
>> Tel: (21) 94429486/78101651 id: 123*20942<br>
>><br>
>><br>
>><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>
>> Leia o guia de postagem (<a 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<br>
>> mínimo reproduzível.<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>
Leia o guia de postagem (<a 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>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>Sérgio Henrique Almeida da Silva Junior<br>Doutorando em Epidemiologia em Saúde Pública<br>Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ<br><a href="http://lattes.cnpq.br/1611345552843383">http://lattes.cnpq.br/1611345552843383</a> <br>
Tel: (21) 94429486/78101651 id: 123*20942<br><br><br>