R inferno (rant) [Software]

posted by Helmut Homepage – Vienna, Austria, 2015-10-27 21:06 (2277 d 20:39 ago) – Posting: # 15584
Views: 7,448

Hi useRs!

Sometimes this nice piece drives me nuts.

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!

Dif-tor heh smusma 🖖
Helmut Schütz

The quality of responses received is directly proportional to the quality of the question asked. 🚮
Science Quotes

Complete thread:

 Admin contact
21,833 posts in 4,568 threads, 1,554 registered users;
online 7 (0 registered, 7 guests [including 6 identified bots]).
Forum time: Friday 17:45 CET (Europe/Vienna)

No problem can stand the assault of sustained thinking.    Voltaire

The Bioequivalence and Bioavailability Forum is hosted by
BEBAC Ing. Helmut Schütz