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:<[email protected]>        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 <[email protected]> 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]]
>
>______________________________________________
>[email protected] 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.

______________________________________________
[email protected] 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.

Reply via email to