Não entendi Elias!
Em 22 de julho de 2013 09:00, Elias Krainski <[email protected]>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 > [email protected]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. > > > > _______________________________________________ > R-br mailing list > [email protected] > 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
_______________________________________________ R-br mailing list [email protected] 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.
