通过R中的弹出窗口获取输入

我想通过消息窗口读取用户在R编程中给出的输入

例如，它应该在弹出框中给出一条消息“输入号码”，并在消息框本身中输入号码。然后我想把这个数字存储在一个变量中

提前谢谢你的帮助

提供了这样的解决方案

library(svDialogs)
user.input <- dlgInput("Enter a number", Sys.info()["user"])$res

---

有很多建议，非常感谢parth。。！这在Jupyter笔记本中不起作用。它可以从RTerm命令行正常工作。有人知道为什么会这样吗？非常感谢。如果您写了一个数字，不要忘记使用as.numeric（user.input）进行转换，以便能够使用

> user.input
[1] "68"