Repeat elements of vector in R

Question

I'm trying to repeat the elements of vector a, b number of times. That is, a="abc" should be "aabbcc" if y = 2.

Why doesn't either of the following code examples work?

sapply(a, function (x) rep(x,b))

and from the plyr package,

aaply(a, function (x) rep(x,b))

I know I'm missing something very obvious ...

Fireworks

Answer 1

Assuming you a is a vector, sapply will create a matrix that just needs to be collapsed back into a vector:

a<-c("a","b","c")
b<-3 # Or some other number
a<-sapply(a, function (x) rep(x,b))
a<-as.vector(a)

Should create the following output:

"a" "a" "a" "b" "b" "b" "c" "c" "c"

Slideaction

Forgot about collapsing it. This obviously works. Not sure why plyr's aaply doesn't. Oh well. – Fireworks

Answer 2

a is not a vector, you have to split the string into single characters, e.g.

R> paste(rep(strsplit("abc","")[[1]], each=2), collapse="")
[1] "aabbcc"

Sodium

The "each=" argument to rep is notable, too. :-) – Fosse

I made a mistake in my writeup of the question, a was indeed meant to be a vector, eg a=c("a","b","c"). If it weren't, your solution is obviously correct. Thanks! – Fireworks

Answer 3

Here is another option with gsub/strrep in base R

gsub("(.)", strrep("\\1", 2), a)
#[1] "aabbcc"

data

a <- 'abc'

Telegraphy