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

Question

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

Answer 1

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

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

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

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

Answer 2

Попробуйте

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

Answer 3

Старый вопрос, но после долгих поисков я обнаружил, что пакет 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))
}

Answer 4

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

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