R for loop through vector and lapply

Asked Feb 17 '16 at 09:10

Active Feb 17 '16 at 09:10

Viewed 31 times

I want to create a function that pads zeros no the left until the number is exact 5-digit. For that I’ve created the following function called prefix.

prefix <- function(baa) {

        for (i in 1:(5 - nchar(toString(baa)))) {
                    baa <- paste0("0", baa)
        }
        baa
}

This function works well with a single integer, but fails to do its job if it receives a vector. My goal is to create a function that will return

given

I think this could be easely achieved with lapply, but I havent figuered it out yet. Can you please help?

asked Feb 17 '16 at 09:10

Eduardo

2,405
3
14
19

3

why not using `sprintf("%05i",vector)` ? – Tensibai Feb 17 '16 at 09:16
@Tensibai - my question is not how to pad, but how to use lapply to do it – Eduardo Feb 17 '16 at 12:00
Ô_o just lapply(vec,prefix) but I'm this case sapply would be better (returning a vector instead of a list)... – Tensibai Feb 17 '16 at 12:03

R for loop through vector and lapply

0 Answers0