Re: [R] Please, remind a function name

From: Peter Dalgaard <p.dalgaard_at_biostat.ku.dk>
Date: Wed, 23 May 2007 01:56:31 +0200

Vladimir Eremeev wrote:
> Sorry, I'm stuck. :)
>
> I am writing a function, which would fit either one linear model or another
> one, depending on its argument model.type.
> And I don't want to use several if's, because R allows doing it with much
> more beauty.
>
> That is I am looking for prettier alternative to the following
>
> AB2C<-function(a,b,model.type="S") { # or HK, and return NULL if this
> argument has any other value
> [ do some stuff]
>
> if(model.type=="S") model<-lm( [s.model formula] )
> else if (model.type == "HK") model<-lm([hk.model formula])
> else model<-NULL
>
> return(model)
> }
>
> I was looking at "switch", but didn't come to solution. Sorry <:
Er, what's wrong with

model <- switch(model.type,

                S  = lm( [s.model formula] ), 
                HK = lm([hk.model formula] ))

?



R-help_at_stat.math.ethz.ch 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. Received on Wed 23 May 2007 - 00:01:05 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Wed 23 May 2007 - 01:31:04 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.