Try
f <- function(nbr){
y<-rnorm(nbr)
y1 <- mean(y)
plot(y)
invisible( y1)
}
That will return y1 invisibly, so
f(100)
plots but returns nothing visible but
w<-f(100)
plots and places the return value in w
>>> Dennis Murphy <djmu...@gmail.com> 02/19/10 9:33 PM >>>
Hi:
Perhaps you want this:
f <- function(nbr){
y<-rnorm(nbr)
y1 <- mean(y)
plot(y)
list(y1 = y1)
}
f(100) prints out the mean and executes the plot
w <- f(100) executes the plot
> w$y1
[1] 0.06965205
returns the mean as a component of the object w.
HTH,
Dennis
On Fri, Feb 19, 2010 at 10:06 AM, threshold <r.kozar...@gmail.com>
wrote:
>
> Thank you for response. The problem is that using return(y1) in my
function
> formula always returns y1, but what I want is to return it only when I
> wish,
> like p.value in
> t.test(rnorm(100),rnorm(100))$p.value
>
> robert
> --
> View this message in context:
> http://n4.nabble.com/retrieve-from-function-tp1561972p1562012.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> R-help@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.
>
[[alternative HTML version deleted]]
______________________________________________
R-help@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.
*******************************************************************
This email and any attachments are confidential. Any use...{{dropped:8}}
______________________________________________
R-help@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.
