Round up from .5

by

This is not my own function, and unfortunately, I can’t find where I got it at the moment (originally found as an anonymous comment at the Statistically Significant blog), but it should help with what you need.

round2 = function(x, n) {
  posneg = sign(x)
  z = abs(x)*10^n
  z = z + 0.5 + sqrt(.Machine$double.eps)
  z = trunc(z)
  z = z/10^n
  z*posneg
}

x is the object you want to round, and n is the number of digits you are rounding to.

An Example

x = c(1.85, 1.54, 1.65, 1.85, 1.84)
round(x, 1)
# [1] 1.8 1.5 1.6 1.8 1.8
round2(x, 1)
# [1] 1.9 1.5 1.7 1.9 1.8

(Thanks @Gregor for the addition of + sqrt(.Machine$double.eps).)

More Related Contents:

  1. Formatting Decimal places in R
  2. R round to nearest .5 or .1
  3. Reshaping data.frame from wide to long format
  4. ggplot with 2 y axes on each side and different scales
  5. Quickly reading very large tables as dataframes
  6. Order discrete x scale by frequency/value
  7. Combine two data frames by rows (rbind) when they have different sets of columns
  8. Counting unique / distinct values by group in a data frame
  9. How to use a variable to specify column name in ggplot
  10. Determine path of the executing script
  11. ggplot2 line chart gives “geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?”
  12. Reshape multiple value columns to wide format
  13. How to find common elements from multiple vectors?
  14. How to generate permutations or combinations of object in R?
  15. Generate multiple graphics from within an R function
  16. Numeric comparison difficulty in R
  17. Remove duplicated rows
  18. Use of ~ (tilde) in R programming Language
  19. Combine two or more columns in a dataframe into a new column with a new name
  20. Conditional merge/replacement in R
  21. Subset rows in a data frame based on a vector of values
  22. How to plot a function curve in R
  23. Index values from a matrix using row, col indices
  24. What are the differences between “=” and “
  25. Keeping trailing zeros
  26. What do the %op% operators in mean? For example “%in%”?
  27. Display exact value of a variable in R
  28. Extreme numerical values in floating-point precision in R
  29. Is there anything wrong with using T & F instead of TRUE & FALSE?
  30. Round a POSIX date (POSIXct) with base R functionality

Leave a Comment