R/nchoosek.R

In MXM: Feature Selection (Including Multiple Solutions) and Bayesian Networks

Defines functions nchoosek

Documented in nchoosek nchoosek

nchoosek = function(cs , k) {  #i can also pass the compFun arg for selecting
  if (length(cs) == 1) { #if not vector
    res = choose(cs, k); #or nchoosek
  } else  res = combn(cs, k)
  res;
}

Try the MXM package in your browser