Nothing

```
#' Discretizing a numeric vector
#'
#' The function \code{qcut} discretizes a numeric vector into N pieces based
#' on quantiles.
#'
#' @param x A numeric vector.
#' @param n An integer indicating the number of categories to discretize.
#'
#' @return A numeric vector to divide the vector x into n categories.
#'
#' @examples
#' x <- 1:10
#' # [1] 1 2 3 4 5 6 7 8 9 10
#' v <- qcut(1:10, 4)
#' # [1] 3 5 8
#' findInterval(x, sort(c(v, -Inf, Inf)), left.open = TRUE)
#' # [1] 1 1 1 2 2 3 3 3 4 4
qcut <- function(x, n) {
return(unique(stats::quantile(x, probs = seq(0, 1, 1 / n)[2:n], na.rm = TRUE, type = 1)))
}
```

**Any scripts or data that you put into this service are public.**

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.