n <- -42
classify <- ifelse(n > 0, "positive", "negative")
# classify = negative
# ifelse() takes a vector, if takes one value
numbers <- c(-42, 7, 0)
classes <- ifelse(numbers > 0, "positive",
"negative")
# classes = negative positive negative
cat("classify =", classify, "\n")
cat("classes =", classes, "\n")