2019-04-15 Vectorized conditional statement in R and Racket