web-dev-qa-db-ja.com

Rで文字列をN回繰り返す方法は?

In Ruby次のように文字列をn回繰り返すことができます。

例えば。 "my_string" * 2 -> "my_stringmy_string"

Rでこれを行うための同様に簡単な方法はありますか?

42
Gevorg

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"
48

R 3.3.0を使用すると、base Rstrrepを使用できます

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"
39
akrun

つかいます stri_dupstringiパッケージの関数

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
18
bartektartanus