Сохранить файл в интерактивном режиме?

Question

Использование tk_choose.files или file.choose Я могу выбрать файл в интерактивном режиме. Есть ли аналогичная функция, в которой я могу позволить пользователю в интерактивном режиме решить, где сохранить вывод таблицы write.table?

Answer 1

В Windows 7 и работает через RGUI, я могу указать что-то вроде:

write.table(x = iris, file = file.choose()) 

который выскакивает открытый диалог Проводника Windows. Затем я могу перейти к любому существующему файлу, создать новый файл, щелкнув правой кнопкой мыши или просто набрав имя нового файла, где он попросит создать новый файл.

Я думаю, это может быть не независимым от платформы ... могут ли другие с соответствующей проверкой ОС?

Answer 2

@Chase - это работает в OS X (Eclipse и StatET). По крайней мере, я пытался писать data.frame (DF) в виде файла CSV:

write.csv(x = df, file = file.choose()) 

Answer 3

Попробуйте

val <- tkgetSaveFile(initialfile="", title="Save a file...") 
f <- tclvalue(val) 
if(f != "") ... 

Answer 4

Старый вопрос, но после долгих поисков я обнаружил, что tcltk2 пакет в настоящее время существует как улучшение tcltk:

library(tcltk2) 
filename <- tclvalue(tkgetSaveFile()) 
if (!nchar(filename)) { 
    tkmessageBox(message = "No file was selected!") 
} else { 
    tkmessageBox(message = paste("The file selected was", filename)) 
}