r - ベクトルを自分自身の上に繰り返す

Question

ベクトルがあるとします：

tt <- c("test", "this" "function")

これに変換するにはどうすればよいですか：

>tt "test AS test", "this AS this", "function AS function"

ペーストを数回繰り返してみましたが、必要なものを完全に得ることができませんでした。

Answer 1

pasteベクトル化されます:

> tt <- c("test", "this", "function")
> paste(tt,"AS",tt)
[1] "test AS test"         "this AS this"         "function AS function"

Answer 2

使いたくなるsapply

> sapply(tt, function(X) paste0(X, " AS ", X))
                  test                   this               function 
        "test AS test"         "this AS this" "function AS function"