In Ruby次のように文字列をn回繰り返すことができます。
例えば。 "my_string" * 2 -> "my_stringmy_string"
Rでこれを行うための同様に簡単な方法はありますか?
replicate
またはrep
を使用できます。
replicate(2, "my_string")
# [1] "my_string" "my_string"
rep("my_string", 2)
# [1] "my_string" "my_string"
paste
はそれをまとめます:
paste(replicate(2, "my_string"), collapse = "")
# [1] "my_stringmy_string"
R 3.3.0
を使用すると、base R
のstrrep
を使用できます
strrep("my_string",2)
#[1] "my_stringmy_string"
times
に値のベクトルを渡すこともできます
strrep("my_string",1:3)
#[1] "my_string" "my_stringmy_string"
#[3] "my_stringmy_stringmy_string"
つかいます stri_dup
stringi
パッケージの関数
stri_dup("abc",3)
[1] "abcabcabc"
また、ベクトル化されているため、これを行うことができます。
> stri_dup(letters[1:3],4)
[1] "aaaa" "bbbb" "cccc"
パフォーマンスの比較:)
> microbenchmark(stri_dup("abc",3),paste(replicate(3, "abc"), collapse = ""))
Unit: microseconds
expr min lq median uq max neval
stri_dup("abc", 3) 2.362 3.456 7.0030 7.853 64.071 100
paste(replicate(3, "abc"), collapse = "") 57.131 61.998 65.2165 68.017 200.626 100
> microbenchmark(stri_dup("abc",300),paste(replicate(300, "abc"), collapse = ""))
Unit: microseconds
expr min lq median uq max neval
stri_dup("abc", 300) 6.441 7.6995 10.2990 13.757 45.784 100
paste(replicate(300, "abc"), collapse = "") 390.137 419.7740 440.5345 460.042 573.975 100