当使用svalue（）时，R gWidgets会禁止触发事件处理程序

Question

如果我使用svalue（A）＆lt; -...从另一个gwidgets对象B更改gwidgets对象A的值，我该如何防止触发对象A的事件处理程序？例如，

library(gWidgets)
window = gwindow("test")
gg = ggroup(horizontal=TRUE, container=window)
sb = gspinbutton(value=0, from=0, to=100, by=1, container=gg, handler=function(h,...)print("sb"))
cbg = gcheckboxgroup(c("geo","ari"), checked=c(TRUE,FALSE), container=gg, handler=function(h,...){
            print("cbg")
            svalue(sb) = svalue(sb) + 1
        })

当我选中/取消选中＆＃34; cbg＆＃34;时，如何阻止＆＃34; sb＆＃34;的事件处理程序？被触发？或者，任何人都可以提出更好的方法吗？