Bioequivalence and Bioavailability Forum

x1 <- 12
x2 <- 13
x1 < x2
[1] TRUE     Bravo! Bravissimo!

ifelse (x1 < x2,
  cat(x1, "less than", x2, "\n"),
  cat(x1, "at least", x2, "\n"))

12 less than 13
Error in ifelse(x1 < x2, cat(x1, "less than", x2, "\n"), cat(x1, "at least",  :
  replacement has length zero
In addition: Warning message:
In rep(yes, length.out = length(ans)) :
  'x' is NULL so the result will be NULL
   What the f…k?

if (x1 < x2) {
  cat(x1, "less than", x2, "\n")
} else {
  cat(x1, "at least", x2, "\n")
}

12 less than 13   Thank you sooo much!