R help - Sep 2003 - Save object R with tkgetSaveFile

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

solares at unsl.edu.ar wrote:
>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
>
>______________________________________________
>R-help at stat.math.ethz.ch mailing list
>https://www.stat.math.ethz.ch/mailman/listinfo/r-help
>  
>
Try:

 x<-1:3
a<-tkgetSaveFile()
if(0<length(a)) save(x,file=as.character(a))

Peter Wolf