R/subsets.r

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],]
}

Try the Rfit package in your browser

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

Rfit documentation built on Sept. 8, 2023, 5:59 p.m.