R/rawTable.R

Defines functions rawTable

rawTable <- function(..., ncol=2) {
  freqs <- c(...);
  if (!all(is.numeric(freqs))) {
    stop("Non-numeric values specified!");
  }
  return(matrix(c(freqs), ncol=ncol, byrow=TRUE));
}
Matherion/metabefor documentation built on Nov. 8, 2019, 7:34 a.m.