在R中重复表达几次

时间:2014-12-10 17:47:37

标签: r

在R中,我想找出字符串长度对某个操作的计算时间的影响。为此,我需要不同长度的随机字符串。我现在能想到的只有:

cases1 <- letters[sample(15)]
cases2 <- paste(letters[sample(15)], letters[sample(15)], sep="")
cases3 <- paste(letters[sample(15)], letters[sample(15)], letters[sample(15)], sep="")

如何实现自动化? 我不想保持复制...... 或者有没有人有更好的主意?

1 个答案:

答案 0 :(得分:1)

尝试

 n <- 3
 do.call(`paste0`,as.data.frame(replicate(n, letters[sample(15)])))

如果你想说1:3

 n1 <- 1:3
 lapply(n1, function(.n) do.call(`paste0`,
    as.data.frame(replicate(.n, letters[sample(15)]))))

或@Berry在评论中表示

 apply(replicate(3, letters[sample(15)]), MARGIN=1, paste, collapse="")