R/tab2df.R

In arnima-github/arni: Arni's Toolbox

#' Table to Data Frame
#'
#' Convert table (including xtabs) to data frame.
#'
#' @param x a table.
#'
#' @return Data frame with same data as \code{x}.
#'
#' @importFrom utils type.convert
#'
#' @export

tab2df <- function(x)
{
  as.data.frame(unclass(x), row.names=type.convert(row.names(x), as.is=TRUE))
}