I just gave up a second too early: It does not work with ifelse(...) as ifelse(...) assigns only a singley value (the first in the vector). A regular if(...) else ... condition works, however.
Daniel Malter wrote: > > Hi all, I am quite sure it's not a bug, but I am going nuts about this. I > do > not possibly understand why I get different results for b1 and b2 as shown > below. > > x=c(183,191,192,193,195,206,207,209,210,211,212,213,214,217,218,221,222,223, > 224,225,227,228,229,230) > > y=c(221,225,228,241,242) > > z=y[y<max(x)] ##all Ys smaller than the maximum of X > > a=ifelse(length(z)==0,NA,max(z)) ##assign NA if length of z is zero, take > the max of z otherwise > > b1=ifelse(is.numeric(a)==T,x[x>a],x) ##if a is numeric, assign all x that > are greater than a; otherwise assign the entire x > > b2=x[x>a] ## assign all x greater than a > > > b1 and b2 should be equal as I see it. Anybody who can explain why they > are > not makes my day, especially the one who can tell me how I can get b1 > equal > to b2 (without sacrificing the ifelse condition). > > Thanks much, > Daniel > > ------------------------- > cuncta stricte discussurus > > ______________________________________________ > [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. > > -- View this message in context: http://www.nabble.com/Bug-in-ifelse-tp19907970p19908084.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ [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.
