Повторить элементы вектора в R

Question

Я пытаюсь повторить элементы вектора a, b числа раз. То есть a = «abc» должно быть «aabbcc», если y = 2.

Почему не работает ни один из следующих примеров кода?

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

и из пакета plyr,

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

Я знаю, что я что-то очень очевидное отсутствие ...

Answer 1

Предполагая, что вы a вектор, sapply создаст матрицу, которая просто должна быть свернуты обратно в вектор:

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

Если создать следующий вывод:

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

Answer 2

a не является вектором, вы должны разделить строку на одного символов, например

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