图形输入另存为矢量

Question

我想要一个存储在矢量中的图形用户输入。 menu函数接受图形输入。看到这里：

choice <- menu(as.character(1:5), graphics= TRUE)

但是，我想输入任何数字，而不是从向量中选择一个数字。 readline()接受任何输入，但显示在concole中，而不是在单独的窗口中显示。有什么简单的方法可以做到这一点？我想避免使用shiny，因为这对我来说似乎不是一个简单的解决方案。

Answer 1

您可以使用svDialogs进行此操作：

library(svDialogs)
user.input <- as.numeric(dlgInput("Enter a number")$res)