r - 在R下的windows中弹出结果

Question

计算后我想弹出一个显示消息和结果的窗口。在以下示例中，我想在弹出窗口中显示 x 的值。函数 winDialog 似乎无法执行它。

library(sp)
library(svDialogs)
library(rgdal)

x <- runif(1, 1, 10)
if(x <= 5){
  winDialog("ok", "OK")
} else{
  winDialog("ok", "too big")
}

标签： rpopup

Answer 1

您可以使用paste()组合变量的值x和要打印的文本。请注意，该winDialog()功能仅在 windows 下有效，在其他操作系统下无效。

x <- runif(1, 1, 10)
winDialog("ok", paste(x, ifelse(x <= 5, "is OK", "is too big")))