R/untable.R

In fischuu/Luke: Subfunctions for Data Handling

Defines functions untable

Documented in untable

# This is the untable function that reverses the table command

untable <- function(x){
  rep(as.numeric(names(x)),x)
}