Question

这是其中之一＆＃34;必须有更好的方式！＆＃34;的东西。我有一个嵌套的粘贴语句，我将在下面发布上下文。我需要在group x：type y的竞赛中打印一条说明＆＃34; group a, group b, ...group so and so击败以下群组的声明，其中＆＃34;代码＆＃34; section是指由函数的其他方面确定的不同变量。我现在的方式是将几个不同的粘贴语句嵌套在一起，其中五个是准确的。关于如何减少这个问题的任何想法......凌乱吗？这是原始代码：

paste(paste(paste(paste(un[j], "beat out the following groups:"), paste(un[t],collapse=", ")), "in"), n[i])

Answer 1

我会使用$variables来解决大部分问题：

sprintf

从风格上讲，我甚至可能会在两行中完成这项工作，以使其更具可读性：

un <- letters
paste(paste(paste(paste(un[1], "beat out the following groups:"), paste(un[2:10],collapse=", ")), "in"), un[11])

#...versus:
sprintf("%s beat out the following groups: %s in %s",un[1],paste(un[2:10],collapse = ", "),un[11])

R中的嵌套粘贴语句

1 个答案: