R: Как показать диалог сохранения файла для сохранения моего файла в gWidgets

Question

Я хочу сохранить файл с помощью GUI Сохранить мастер в gWidgets.

С Мастера сохранения Я хочу сказать, что, как мы можем выбрать файл с file.choose(), аналогично, как мы можем сохранить наш файл с помощью любого мастера сохранить в R gWidgets

Пожалуйста, дайте предложение

Answer 1

Короткий ответ: вы не можете. Длинный ответ: вы можете сделать свое собственное меню.

Для этого создайте графическое устройство, передающее 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)