R/freq.R

Defines functions freq

Documented in freq

freq <-
  function (x) {
    freq <- data.frame(n = summary(x), pc = round(summary(x)/length(x)*100, 1))
    freq <- rbind(rep(NA, ncol(freq)), freq)
    row.names(freq) <- c(deparse(substitute(x)), paste("  ", levels(x), sep=""))
    freq
  }

Try the psytabs package in your browser

Any scripts or data that you put into this service are public.

psytabs documentation built on May 29, 2017, 10:52 p.m.