Vectorized IF statement in R?

by 
x <- seq(0.1,10,0.1)

> x
  [1]  0.1  0.2  0.3  0.4  0.5  0.6  0.7  0.8  0.9  1.0  1.1  1.2  1.3  1.4  1.5
 [16]  1.6  1.7  1.8  1.9  2.0  2.1  2.2  2.3  2.4  2.5  2.6  2.7  2.8  2.9  3.0
 [31]  3.1  3.2  3.3  3.4  3.5  3.6  3.7  3.8  3.9  4.0  4.1  4.2  4.3  4.4  4.5
 [46]  4.6  4.7  4.8  4.9  5.0  5.1  5.2  5.3  5.4  5.5  5.6  5.7  5.8  5.9  6.0
 [61]  6.1  6.2  6.3  6.4  6.5  6.6  6.7  6.8  6.9  7.0  7.1  7.2  7.3  7.4  7.5
 [76]  7.6  7.7  7.8  7.9  8.0  8.1  8.2  8.3  8.4  8.5  8.6  8.7  8.8  8.9  9.0
 [91]  9.1  9.2  9.3  9.4  9.5  9.6  9.7  9.8  9.9 10.0

> ifelse(x < 5, 1, 2)
  [1] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
 [38] 1 1 1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2
 [75] 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2

More Related Contents:

  1. Why can’t R’s ifelse statements return vectors?
  2. Does ifelse really calculate both of its vectors every time? Is it slow?
  3. How to join (merge) data frames (inner, outer, left, right)
  4. Why are these numbers not equal?
  5. Dynamically select data frame columns using $ and a character value
  6. Error: could not find function … in R
  7. Simultaneously merge multiple data.frames in a list
  8. Count number of rows within each group
  9. Drop unused factor levels in a subsetted data frame
  10. Use dynamic name for new column/variable in `dplyr`
  11. Select rows from a data frame based on values in a vector
  12. Issue when passing variable with dollar sign notation ($) to aes() in combination with facet_grid() or facet_wrap()
  13. How can I remove all duplicates so that NONE are left in a data frame?
  14. strptime, as.POSIXct and as.Date return unexpected NA
  15. Controlling number of decimal digits in print output in R
  16. Why is it not advisable to use attach() in R, and what should I use instead?
  17. Round up from .5
  18. How can two strings be concatenated?
  19. Create an empty data.frame
  20. What does “The following object is masked from ‘package:xxx'” mean?
  21. Understanding the order() function
  22. How to remove all whitespace from a string?
  23. How to subtract/add days from/to a date?
  24. How can I remove an element from a list?
  25. Remove backslashes from character string
  26. if-else vs ifelse with lists
  27. if – else if – else statement and brackets
  28. What does “S3 methods” mean in R?
  29. How to get help in R?
  30. Why doesn’t outer work the way I think it should (in R)?

Leave a Comment