On Thu, Jul 9, 2009 at 4:50 AM, Petr PIKAL <[email protected]> wrote:
> Hi > > [email protected] napsal dne 09.07.2009 02:57:33: > > > On Wed, Jul 8, 2009 at 8:34 PM, Jason Rupert<[email protected]> > wrote: > > > > > > Maybe there is a great website out there or white paper that discusses > this > > but again my Google skills (or lack there of) let me down. > > > > Yeah, R is difficult to search for - I've had partial success with > > rseek.org, though. > > > > > > > > I would like to know the best way to export several doubles from a > function, > > where the doubles are not an array. > > > > > > Here is a contrived function similar to my needs: > > > > > > multipleoutput<-function(x) > > > { > > > squared<-x^2 > > > cubed<-x^3 > > > exponentioal<-exp(x) > > > factorialVal<-factorial(x) > > > > > > } > > > > You can always do: > > > > > multipleoutput <- function (x) { return (c(square = x^2, cube = x^3, > exp = exp(x))) } > > > > But then you'd have to call it like so: > > > > > mapply(multipleoutput, c(0,1,2)) > > [,1] [,2] [,3] > > square 0 1.000000 4.000000 > > cube 0 1.000000 8.000000 > > exp 1 2.718282 7.389056 > > > > If you call it like so: > > > > > multipleoutput(c(0,1,2)) > > square1 square2 square3 cube1 cube2 cube3 exp1 exp2 > > 0.000000 1.000000 4.000000 0.000000 1.000000 8.000000 1.000000 2.718282 > > exp3 > > 7.389056 > > > > then R flattens the result. Weird. > > Not so weird. What do you expect from > > c(1:5, 10:20, 30:50) You mean what I expect personally, with my background? I'd expect a jagged array of arrays. 1 2 3 4 5 10 11 12 .. 20 30 31 .. 50 If operator c() constructs an array out of its arguments, and if the sequence operator : constructs an array, then c(1:5) should construct an array of arrays. > > That is basically what your function do. With slight modification you can > get tabular output without mapply > > multipleoutput <- function (x) { > result.s <- x^2 > result.c <- x^3 > result.e <- exp(x) > cbind(square=result.s, cube=result.c, exp=result.e) > } Just for clarification: is there any significance to your using the . in the names result.s, result.c, etc. like there would be in some other languages where dot is an operator? - Godmar [[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.
