有没有更好的方法在R中创建分位数“dummies”因子?

对于基R,使用分位数计算分割,然后剪切以将数值变量转换为离散变量:

qcut <- function(x, n) {
  cut(x, quantile(x, seq(0, 1, length = n + 1)), labels = seq_len(n),
    include.lowest = TRUE)
}

或者如果你只想知道号码:

qcut2 <- function(x, n) {
  findInterval(x, quantile(x, seq(0, 1, length = n + 1)), all.inside = T)
}

我不知道quantcut是什么,但我会做以下事情

qdum <- function(v, q) {
 library(Hmisc)
 quantilenum <- cut2(v, g=q)
 levels(quantilenum) <- 1:q
 cbind(v, quantilenum)
}