R 在对话框中提取gedit的值

我正在尝试创建一个界面，用户可以在其中输入一个数字，以便脚本运行。但是，我无法检索键入gedit的值。有人能帮我吗？以下是我所做的：

require(gWidgets2RGtk2) #Load package
w=gbasicdialog("key number")
a<-gedit("1",cont=w,handler=function(h,...){number<-svalue(a)})
visible(w)=TRUE

require（gWidgets2RGtk2）#加载包
w=GBASIC对话框（“键号”）
a在这里，我创建2个gedit，并使用按钮用另一个值更新其中一个的值：

w <- gwindow("test")
g <- ggroup(cont=w, horizontal=FALSE)
x <- gedit("20",cont=g)
gbutton("changevalue",cont=g,handler=function(h,...) {
  svalue(e) <- svalue(x)
})
e <- gedit("", cont=g)

w我在这里所做的与jverzani建议的一样

require(gWidgets2RGtk2) #Load package
 w = gbasicdialog("key number")
 a <- gedit("1",cont=w)
 addHandlerKeystroke(a, handler=function(h,..) { 

    number <- svalue(a)
    print(number)
 })
 visible(w)=TRUE

require（gWidgets2RGtk2）#加载包
w=GBASIC对话框（“键号”）
a我是否可以不添加按钮就执行此操作？您有addHandlerKeystroke，当通过键入更新
gedit
框中的值时，会调用该按钮。