or
with(foo, (x < y) * (x > z))
On 5/10/07, jim holtman <[EMAIL PROTECTED]> wrote:
> You don't need apply. Just do
>
> foo$result <- ifelse((foo$x < foo$y) | (foo$x > foo$z), 1, 0)
>
> On 5/10/07, Greg Tarpinian <[EMAIL PROTECTED]> wrote:
> > I have a question that must have a simple answer (but eludes me).
> > I need a row-by-row logical comparison across three numeric variables
> > in
> > a data frame: foo$x, foo$y, foo$z. The logic is
> >
> > if( x < y || x > z ) 1 else 0
> >
> > for a particular row.
> >
> > It is simple and very inefficient to use for(i in 1:length(foo$x)){ }
> > loops. How can I accomplish this using sappy( ) / lapply( ) / apply( )
> > or some other more efficient method?
> >
> > Thank you in advance,
> >
> > Greg
> >
> > ______________________________________________
> > [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.
> >
>
>
> --
> Jim Holtman
> Cincinnati, OH
> +1 513 646 9390
>
> What is the problem you are trying to solve?
>
> ______________________________________________
> [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.
