[R] Puzzled at ifelse()

From: Ajay Narottam Shah <ajayshah_at_mayin.org>
Date: Tue 12 Jul 2005 - 20:07:07 EST


I have a situation where this is fine:

> if (length(x)>15) {

      clever <- rr.ATM(x, maxtrim=7)
    } else {
      clever <- rr.ATM(x)
    }
> clever

  $ATM
  [1] 1848.929

  $sigma
  [1] 1.613415

  $trim
  [1] 0

  $lo
  [1] 1845.714

  $hi
  [1] 1852.143

But this variant, using ifelse(), breaks:

> clever <- ifelse(length(x)>15, rr.ATM(x, maxtrim=7), rr.ATM(x))
> clever

  [[1]]
  [1] 1848.929

What am I doing wrong?

-- 
Ajay Shah                                                   Consultant
ajayshah@mayin.org                      Department of Economic Affairs
http://www.mayin.org/ajayshah           Ministry of Finance, New Delhi

______________________________________________
R-help@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
Received on Tue Jul 12 20:26:43 2005

This archive was generated by hypermail 2.1.8 : Fri 03 Mar 2006 - 03:33:31 EST