in R, expand a function for vectors

Asked Oct 10 '16 at 21:35

Active Oct 10 '16 at 21:35

Viewed 18 times

I created a function for simples characters... my function completes a character with zeros while the number of character is less(strictly) that 4.

completamento<- function(c)
{
  while( nchar(c)< 4)
   {
     c<- paste0("0",c)
   }
return(c)
}

When I do

completamento(c="aaa")
> "0aaa"

It is OK...

But when I try to put the argument of the function to be one vector, there is some wrong..

completamento(c=c("aaa", "bb"))
Warning messages:
1: In while (nchar(c) < 4) { :
   the condition has length > 1 and only the first element will be used
2: In while (nchar(c) < 4) { :
   the condition has length > 1 and only the first element will be used

There is some way to vectorize this function?

asked Oct 10 '16 at 21:35

Vasco

1

A quick fix `completamento – sindri_baldur Oct 10 '16 at 21:44
It's a solution. But I allways avoid to use the looping for in my scripts.. – Vasco Oct 10 '16 at 21:57
@Vasco - a `while()` statement is just a loop too. – thelatemail Oct 10 '16 at 22:54
Yes.. there is some way to avoid the while function? Or in other words, I would to like use the minimal loop functions... – Vasco Oct 10 '16 at 22:56
Some one put this solution and deleted it: completamento – Vasco Oct 10 '16 at 23:05

in R, expand a function for vectors

0 Answers0