如何在句子中打印向量避免返回行

Question

我想在句子中打印向量中的值。但是该向量包含 4 个元素，这导致答案分布在 4 行中。这就是我所拥有的：

  yo = c(2902, 2908, 2907, 2918)

  cat(paste('You have', yo, 'number of individuals per species\n', sep = ' '))

 You have 2902 number of individuals per species
 You have 2908 number of individuals per species
 You have 2907 number of individuals per species
 You have 2918 number of individuals per species

但我想要这样的东西

You have 2902, 2908, 2907 and 2918 number of individuals per species

可以这样做吗？此外，向量并不总是包含 4 个元素。如果我只有 3 或 10 个元素，它应该可以工作。

这不起作用：

  cat(sprintf('You have %s number of individuals per species\n',yo))


  cat(paste('You have', unlist(yo), 'number of individuals per species\n', sep = ' '))

Answer 1

您可以使用toString() 和paste() 来获取最后一部分。我还使用牛津逗号来衡量......

x <- toString(c(yo[-length(yo)], paste("and", yo[length(yo)])))
x
# [1] "2902, 2908, 2907, and 2918"

所以现在我们可以将x 插入到paste() 调用中。

paste("You have", x, "number of individuals per species")
# [1] "You have 2902, 2908, 2907, and 2918 number of individuals per species"

Answer 2

你必须 paste() 和 collapse 选项：

paste('You have',paste( yo[1:(length(yo)-1)], collapse= ', '), 'and', yo[length(yo)], 'number of individuals per species\n')
You have 2902, 2908, 2907 and 2918 number of individuals per species