我想通过gWidgets中的GUI Save向导保存我的文件。
从保存向导我想说,我们可以选择带有 file.choose()的文件,同样我们如何保存文件使用R gWidgets中的任何保存向导
请提出建议
答案 0 :(得分:2)
简短的回答:你做不到。 答案很长:你可以自己制作菜单。
为此,创建,图形设备将no_popup=TRUE
传递给构造函数。
然后您可以自由添加自己的弹出菜单。 ggraphics中的那个基本上就是这个(指向托马斯所做的gfile
):
library(gWidgets)
g = ggraphics(cont=gwindow(), no_popup=TRUE)
l <- list()
l$copyAction <- gaction("Copy", "Copy current graph to clipboard", icon="copy",
handler=function(h, ...) copyToClipboard(obj))
l$printAction <- gaction("Save", "Save current graph", icon="save",
handler=function(h,...) {
fname <- gfile(gettext("Filename to save to"), type="save")
if(nchar(fname)) {
if(!file.exists(fname) || gconfirm(gettext("Overwrite file?")))
svalue(obj) <- fname
}
})
add3rdMousePopupmenu(g, l)