向paste0（）添加一个附加字母

Question

我想知道是否可以在下面的paste0()命令中添加一个附加的p字母，以便代替（当前）打印输出： "p1-2" "p1-3" "p2-3" [ 注意 p在第二个元素中]，我的代码会打印出来： "p1-p2" ， "p1-p3" ， "p2-p3" ？

p <- list()
for(i in 1:3){
    p[[i]] <- rbeta(20, 2, 6)
}
paste0("p", combn(seq_along(p), 2, FUN = paste, collapse = "-")) ## HERE ##

Answer 1

将p粘贴到combn的输入而不是输出上：

combn(paste0("p", seq_along(p)), 2, FUN = paste, collapse = "-")
# [1] "p1-p2" "p1-p3" "p2-p3"