Code snippets Snippet 1- "if even" function # Sample R function f <- function(x) { if (x%%2 == 0) { return("even") } else { return("odd") } }