R 比较后打印带有标题的计算值

比较值后，如何打印值的标题？ 我有一些计算值存储如下：

Value1 12
Value2 6
Value3 7
Value4 5

如何使用标题打印四个值中的最大值

我只能获取值中的最大值，但无法获取标题/说明 例如：

"print(max(Value1,Value2,Value3,Value4))"

给我：

"12"

但我需要输出为：

"Max. value is Value1 = 12"

---

这是可能的吗？

假设值存储为单个数字对象，如下所示，并使用一些模式值X命名，我们可以将它们全部放入一个列表中，然后获取max/min索引并粘贴：

---

可能的解决办法是：

c <- data.frame(a = c("Value1", "Value2", "Value3"), b = c("4","9","5"), stringsAsFactors = FALSE)

print(paste("Max. value is", str_c(c[which(c$b == max(c$b)), 1], c[which(c$b == max(c$b)), 2], sep = " = "), sep = " "))

---

您能将对象传递给dput并粘贴结果吗？如果数据在数据帧中，那么只需：withdf1[which.maxdf1$b，]，pasteMax。值为，a，=，b

c <- data.frame(a = c("Value1", "Value2", "Value3"), b = c("4","9","5"), stringsAsFactors = FALSE)

print(paste("Max. value is", str_c(c[which(c$b == max(c$b)), 1], c[which(c$b == max(c$b)), 2], sep = " = "), sep = " "))