Question

Please can anyone advise how I can turn the following statement into one that will do the same thing but NOT using ifelse please?

<-ifelse(y>=50, 0.2*x+0.8*y, ifelse(y<50 & x>70, y+10, ifelse(y<50 & x<70, y))) 

x=80
y=60

So I the final code should give an answer of 64 – selecting the first condition. I will then test it to ensure the other 3 conditions give the correct result for varying values of x and y

Thanks a lot.

Answer 1

This should work:

finalmark <- (x * 0.2 + y * 0.8) * (y >= 50) + (y + 10 * (x > 70)) * (y < 50)