On Thu, Jul 9, 2009 at 4:50 AM, Petr PIKAL <petr.pi...@precheza.cz> wrote:
> Hi
>
> r-help-boun...@r-project.org napsal dne 09.07.2009 02:57:33:
>
> > On Wed, Jul 8, 2009 at 8:34 PM, Jason Rupert<jasonkrup...@yahoo.com>
> 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]]
______________________________________________
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.
