[R] Save object R with tkgetSaveFile

[solares@unsl.edu.ar]

HI, my question is about the function tkgetSavefile not save any file, for 
example the next script run OK but
not save the file who i like to save, how i cant to save and object R with 
tkgetSaveFile, how i use the
function save(objet, file="foo.R") with tkgetSaveFile ¿What is the error?. 
I'm work with R 1.7.1

library(tcltk)
x<-1
filetypes <- list("{Texto {.txt}} {Word {.doc}} {Pdf {.pdf}} {Postscript 
{.ps}} {fuente C{.C}} {Eps {.eps}} {Latex {.tex}} {Todos 
*}")                 
fileD <- tkgetSaveFile
(filetypes=filetypes,initialdir="c:\\temp",defaultextension=".txt")
save(x,file="foo.R") #how i cant merge tkgetSaveFile with function "save" 
for to save the object "x"?
thanks Ruben