相同形式的多个输入 gwidgets2
multiple inputs in a same form gwidgets2
我正在尝试将几个 ginputs
放入 gWidgets2
的表单中,或者将文本输入 gedit
小部件作为列表或其他内容使用代码,
library(gWidgets2)
options(guiToolkit = "tcltk")
prj_name = ginput("Project name")
user = ginput("User name")
transfer = ginput("Transfer amount")
我试过 gformlayout
但它们 ginput
显然不能包含在其中;而且我还没有找到如何将小部件上的输入传递给 R
中的对象(在本例中为 list
)
ginput
是一个对话框。您想要的小部件是 gedit
。此示例来自 gformlayout
的帮助页面
w <- gwindow("gformlayout", visible=FALSE)
g <- gvbox(container=w)
flyt <- gformlayout(container=g)
gedit("", label="Name:", container=flyt)
gedit("", label="Rank:", container=flyt)
gedit("", label="Serial No.:", container=flyt)
b <- gbutton("Show me", container=g, handler=function(h,...) {
print(svalue(flyt))
})
addSpring(g)
visible(w) <- TRUE
我正在尝试将几个 ginputs
放入 gWidgets2
的表单中,或者将文本输入 gedit
小部件作为列表或其他内容使用代码,
library(gWidgets2)
options(guiToolkit = "tcltk")
prj_name = ginput("Project name")
user = ginput("User name")
transfer = ginput("Transfer amount")
我试过 gformlayout
但它们 ginput
显然不能包含在其中;而且我还没有找到如何将小部件上的输入传递给 R
list
)
ginput
是一个对话框。您想要的小部件是 gedit
。此示例来自 gformlayout
w <- gwindow("gformlayout", visible=FALSE)
g <- gvbox(container=w)
flyt <- gformlayout(container=g)
gedit("", label="Name:", container=flyt)
gedit("", label="Rank:", container=flyt)
gedit("", label="Serial No.:", container=flyt)
b <- gbutton("Show me", container=g, handler=function(h,...) {
print(svalue(flyt))
})
addSpring(g)
visible(w) <- TRUE