R_Code-5.r (256B)
1 # You have a vector of numbers: x <- c(12, 9, 23, 14). 2 # Use R's shorthand ifelse() function to output "EVEN" if a number 3 # in the vector is divisible by 2 (x %% 2 == 0), and "ODD" if it is not. 4 5 x <- c(12, 9, 23, 14) 6 ifelse(x %% 2 == 0, "EVEN", "ODD")