Question

对于我的问题，可能有一个非常简单的解决方案，但我似乎错过了。

我有以下

p <- 0.95

我想在R控制台中显示结果。

我尝试过

> cat("It is", p*100, "% accurate")

> cat("It is", p*100, paste("%", sep = ""), "accurate")

但是我在数字和％之间留了一个空格

> cat("It is", p*100, "% accurate")
The classifier 95 % accurate

> cat("It is", p*100, paste("%", sep = ""), "accurate")
The classifier 95 % accurate

最终输出应为

The classifier is 95% accurate

不确定如何根据阅读文档来解决此问题

Answer 1

只需将计算移入内部

json_encode

header('Content-Type: application/json'); function returnJSON (string $string, bool $success) { exit(json_encode(['success' => $success, 'message' => utf8_encode($string)])); //Fixing encoding } if ($someCondition) returnJSON("Working well with diacritics (ěščřžýáíé)", false); /*some code...*/是cat("It is", paste0( p*100, "%"), "accurate")的简写。

胶水库对此也非常有用：

paste0

Answer 2

sep会有所帮助：

cat("It is ", p * 100, "% accurate", sep = "")
# It is 95% accurate

sep在哪里

要在每个元素后附加的字符串的字符向量。

，其默认值为" "，因此为空格。这是最短的解决方案，而实际上，您可以按照@Hanjo Jo'burg Odendaal的建议使用sprintf或paste。

在R控制台中使用cat（）和paste（）进行串联和粘贴

2 个答案: