在R中生成一个弹出框

Question

是否可以使弹出框显示给用户以在R中输入值？我整理了几行代码，它们使用readline执行等效功能，但是是否可以使提示出现在控制台以外的其他地方？谢谢！

Answer 1

所述svDialogs包提供一个解决方案。

例如，运行以下命令...

 library(svDialogs)
 ## Ask something...
 user <- dlgInput("Who are you?", Sys.info()["user"])$res

...为我提供了以下弹出输入框：

（正如您所期望的那样，单击“确定”时框中的值将分配给该符号user。）

Answer 2

这个类似问题的答案显示了如何使用 tcltk 包做你想做的事情（实际上它做了更多的事情，所以可以根据你想要的事情缩短）。该代码比 Josh O'Brien 建议的 svDialogs 选项长，但不需要安装额外的软件包（tcltk 是与 R 一起安装的软件包之一）。