[R-br] Duvida Concatenação

[Sérgio Henrique almeida da silva ju]

Não entendi Elias!


Em 22 de julho de 2013 09:00, Elias Krainski
<eliaskrainski em yahoo.com.br>escreveu:

>  Se a variável for inteiro
>   sprintf("%04d", c(1,3,30,50,900))
>
>
> On 07/22/2013 08:57 AM, Sérgio Henrique almeida da silva ju wrote:
>
> Prezados
>
>  Estou tentando concatenar uma variável com a seguinte condição:
> Se ela tiver tamanho 1, gostaria de concatenar 000, se ela tiver tamanho 2
> concateno 00 e se ela tiver tamanho 3 concateno 0.
>
>  Eu pensei na seguinte função:
>
>  dados$len <- nchar(dados$var)
> func <- function(){
>  if (dados$len == 1){
> dados$var1 = paste("000", dados$var, colapse="") }
> else if (dados$len == 2){
> dados$var1 = paste("00", dados$var, colapse="")}
> else if (dados$len == 3){
> dados$var1 = paste("0", dados$var, colapse="")}
> }
> func()
>
>
>  Mas está dando a seguinte mensagem de erro:
>
>  Mensagens de aviso perdidas:
> In if (dados$len == 1) { :
>   a condição tem comprimento > 1 e somente o primeiro elemento será usado
>
>  Vi em outro tópico que o Benilton sugere usar with, mas não sei como
> fazer.
>
>  Abraços
>
>  --
> Sérgio Henrique Almeida da Silva Junior
> Doutorando em Epidemiologia em Saúde Pública
> Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ
> http://lattes.cnpq.br/1611345552843383
> Tel: (21) 68463637
> http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro
>
>
> _______________________________________________
> R-br mailing listR-br em listas.c3sl.ufpr.brhttps://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.
>
>
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> 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.
>



-- 
Sérgio Henrique Almeida da Silva Junior
Doutorando em Epidemiologia em Saúde Pública
Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ
http://lattes.cnpq.br/1611345552843383
Tel: (21) 68463637
http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130722/206d6788/attachment.html>