R help - Dec 2013 - how can i write the function into a file c:/mytest.R with cat function?

mytest<-function(x,f){
        sum(x*f)/sum(f)
        }    
    cat(mytest,file="c:/mytest.R")
    Error in cat(list(...), file, sep, fill, labels, append) : 
    argument 1 (type 'closure') cannot be handled by 'cat'

how can i write the mytest function into a file c:/mytest.R with cat function?
	[[alternative HTML version deleted]]

Hello, ????????!
> mytest<-function(x,f){
>        sum(x*f)/sum(f)
>        }
>    cat(mytest,file="c:/mytest.R")
>    Error in cat(list(...), file, sep, fill, labels, append) :
>    argument 1 (type 'closure') cannot be handled by 'cat'
>
> how can i write the mytest function into a file c:/mytest.R with cat
function?
Maybe by replacing cat(), e.g., by the use of sink():

sink( "c:/mytest.R")
mytest
sink()


You may want to look at ?dput and ?dget.


However, I doubt that that produces what you really want because only the 
body of your function mytest() will be stored in the file, but not the 
assignment that created it. Maybe you should store your R-code, i.e., the 
assignment in a text file (e.g., using R's editor) to -- later again -- 
use source() to read that file in and have it executed? See ?source.

  Hth  --  Gerrit

If you need to use cat() (why?) try using deparse() or format() on the function
   cat("mytest <- ", deparse(mytest), sep="\n",
file=file)
but dump() is easier
   dump("mytest",file=file)

Bill Dunlap
Spotfire, TIBCO Software
wdunlap tibco.com

> -----Original Message-----
> From: r-help-bounces at r-project.org [mailto:r-help-bounces at
r-project.org] On Behalf
> Of ????
> Sent: Friday, December 13, 2013 3:16 AM
> To: r-help
> Subject: [R] how can i write the function into a file c:/mytest.R with cat
function?
> 
> mytest<-function(x,f){
>         sum(x*f)/sum(f)
>         }
>     cat(mytest,file="c:/mytest.R")
>     Error in cat(list(...), file, sep, fill, labels, append) :
>     argument 1 (type 'closure') cannot be handled by 'cat'
> 
> how can i write the mytest function into a file c:/mytest.R with cat
function?
> 	[[alternative HTML version deleted]]
> 
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.