R/perms.R

In LogicForest: Logic Forest

#' Internal Logic Forest Functions
#'
#' INTERNAL FUNCTION TO CREATE PERMUTATIONS OF N VARIABLES
#' This function is called by \code{TTab}. It is not intended to be used independently of this function.
#' @param n integer
#' 
#' @returns mat matrix with each combination of n variables, where inclusion/exclusion is denoted by 0/1
#' @export
#' @keywords internal
#' 
Perms<-function(n)
{
  mat<-matrix(0, nrow=2^n, ncol=n)
  for(i in 1:n)
  {
    mat[,i]<-rep(0:1, times=2^(i-1), each=2^(n-i))
  }
  mat
}