r - 使用 sprintf 打印换行符 - Shiny

Question

我试图在打印时换行。

这是我的代码:

temp <- LETTERS[1:11]

print(sprintf("Rank %s = %s \n", 1:11, temp))

输出:

[1] "Rank 1 = A \n"  "Rank 2 = B \n"  "Rank 3 = C \n"  "Rank 4 = D \n"  "Rank 5 = E \n"  "Rank 6 = F \n"  "Rank 7 = G \n"  "Rank 8 = H \n"  "Rank 9 = I \n" 
[10] "Rank 10 = J \n" "Rank 11 = K \n"

我天真地以为 \n换行了。我想要的输出是:

"Rank 1 = A"  
"Rank 2 = B"  
"Rank 3 = C"  
"Rank 4 = D"  
... etc.

编辑:

Pascal 的评论告诉我它适用于 cat

cat(sprintf("Rank %s = %s \n", 1:11, temp))

我在 renderText 中使用此代码里面有光泽。 print将返回文本，但我无法得到 cat返回文本。

在这种情况下，是否可以在不使用 cat 的情况下生成所需的换行符？ ?

Answer 1

您可以使用 writeLines引入换行符，如下所示:

temp <- LETTERS[1:11]
writeLines(sprintf("Rank %s = %s", 1:11, temp))
Rank 1 = A
Rank 2 = B
Rank 3 = C
Rank 4 = D
Rank 5 = E
Rank 6 = F
Rank 7 = G
Rank 8 = H
Rank 9 = I
Rank 10 = J
Rank 11 = K

您也可以使用 print与 writeLines但它最后会给你一个NULL。