[R] save objects of own function to workspace

Jeff Newmiller jdnewmil at dcn.davis.ca.us
Tue Feb 14 17:02:13 CET 2012


It is possible to do what you ask using <<- instead of <-, but from the perspective of using the function it will be much clearer if you add mz as an argument to the function along with Var, and return mz_int at the end. (The easiest way to return a variable is to type it alone on the last line if your function.) Then you can assign the return value to some variable of your choosing (including possibly one named mz_int in the calling environment) where you call the function.
---------------------------------------------------------------------------
Jeff Newmiller                        The     .....       .....  Go Live...
DCN:<jdnewmil at dcn.davis.ca.us>        Basics: ##.#.       ##.#.  Live Go...
                                      Live:   OO#.. Dead: OO#..  Playing
Research Engineer (Solar/Batteries            O.O#.       #.O#.  with
/Software/Embedded Controllers)               .OO#.       .OO#.  rocks...1k
--------------------------------------------------------------------------- 
Sent from my phone. Please excuse my brevity.

Marion Wenty <marion.wenty at gmail.com> wrote:

>Dear R-helpers,
>
>I created an own function which looks like this
>
>s_elternmz <- function(Var="balt")
>{
>  Dg_a<-mz[,c("asbhh","apkz",Var)]
>  colnames(Dg_a)[colnames(Dg_a)=="apkz"]<-"bpkzm"
>  colnames(Dg_a)[colnames(Dg_a)==Var]<-paste(Var,"_m",sep="")
>  mz_int<-merge(mz,Dg_a,by=c("asbhh","bpkzm"),all.x=T)
>  colnames(Dg_a)[colnames(Dg_a)=="bpkzm"]<-"bpkzv"
>
>colnames(Dg_a)[colnames(Dg_a)==paste(Var,"_m",sep="")]<-paste(Var,"_v",sep="")
>  mz_int<-merge(mz_int,Dg_a,by=c("asbhh","bpkzv"),all.x=T)
>  mz_int <-
>mz_int[order(mz_int$asbhh,mz_int$apkz),c(colnames(mz),paste(Var,"_m",sep=""),paste(Var,"_v",sep=""))]
> }
>
>My problem is that the objects are not saved in the workspace.
>Especially I
>need the object which I created in the end - mz_int - because I want to
>do
>calculations with it in R afterwards.
>
>Thank you very much for your help in advance.
>
>Marion
>
>	[[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.



More information about the R-help mailing list