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 list R-br@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.