R/subsets.r

In kloke/Rfit: Rank-Based Estimation for Linear Models

Defines functions subsets

Documented in subsets

subsets <- function(k) {
  subsets <- expand.grid(rep(list(0:1),k))
  ad  <- apply(subsets,1,sum)
  subsets[order(ad)[-1],]
}