Trim a Vector
Clean data by means of trimming, i.e., by omitting outlying observations.
Trim(x, trim = 0.1, na.rm = FALSE)
x |
a numeric vector to be trimmed. |
trim |
the fraction (0 to 0.5) of observations to be trimmed from each end of x. Values of trim outside that range (and < 1) are taken as the nearest endpoint.
If |
na.rm |
a logical value indicating whether |
A symmetrically trimmed vector x with a fraction of trim observations (resp. the given number) deleted from each end will be returned. If trim is set to a value >0.5 or to an integer value > n/2 then the result will be NA.
The trimmed vector x. The indices of the trimmed values will be attached as attribute named "trim".
This function is basically an excerpt from the base function mean, which allows the vector x to be trimmed before calculating the mean. But what if a trimmed standard deviation is needed?
R-Core (function mean), Andri Signorell <andri@signorell.net>
## generate data set.seed(1234) # for reproducibility x <- rnorm(10) # standard normal x[1] <- x[1] * 10 # introduce outlier ## Trim data x Trim(x, trim=0.1) ## Trim fixed number, say cut the 3 extreme elements from each end Trim(x, trim=3) ## check function s <- sample(10:20) s.tr <- Trim(s, trim = 2) setequal(c(s[attr(s.tr, "trim")], s.tr), s)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.