Extend contigency table with proportions (percentages)

by

If it’s conciseness you’re after, you might like:

prop.table(table(tips$smoker))

and then scale by 100 and round if you like. Or more like your exact output:

tbl <- table(tips$smoker)
cbind(tbl,prop.table(tbl))

If you wanted to do this for multiple columns, there are lots of different directions you could go depending on what your tastes tell you is clean looking output, but here’s one option:

tblFun <- function(x){
    tbl <- table(x)
    res <- cbind(tbl,round(prop.table(tbl)*100,2))
    colnames(res) <- c('Count','Percentage')
    res
}

do.call(rbind,lapply(tips[3:6],tblFun))
       Count Percentage
Female    87      35.66
Male     157      64.34
No       151      61.89
Yes       93      38.11
Fri       19       7.79
Sat       87      35.66
Sun       76      31.15
Thur      62      25.41
Dinner   176      72.13
Lunch     68      27.87

If you don’t like stack the different tables on top of each other, you can ditch the do.call and leave them in a list.

More Related Contents:

  1. Count unique values for every column
  2. Reshaping data.frame from wide to long format
  3. Reshape three column data frame to matrix (“long” to “wide” format) [duplicate]
  4. Combine two data frames by rows (rbind) when they have different sets of columns
  5. Counting unique / distinct values by group in a data frame
  6. Convert a list to a data frame
  7. How to combine multiple conditions to subset a data-frame using “OR”?
  8. cbind a dataframe with an empty dataframe – cbind.fill?
  9. Conditional replacement of values in a data.frame
  10. How to convert a table to a data frame
  11. How do I combine two data-frames based on two columns? [duplicate]
  12. Count NAs per row in dataframe [duplicate]
  13. Changing Column Names in a List of Data Frames in R
  14. dplyr filter with condition on multiple columns
  15. Create categories by comparing a numeric column with a fixed value
  16. Add a prefix to column names
  17. Add empty columns to a dataframe with specified names from a vector
  18. How to sort a data frame in R
  19. How to initialize empty data frame (lot of columns at the same time) in R
  20. Find the n most common values in a vector [duplicate]
  21. Practical limits of R data frame
  22. R: Assign variable labels of data frame columns
  23. rbind data frames based on a common pattern in data frame name
  24. Read and rbind multiple csv files
  25. Count number of zeros per row, and remove rows with more than n zeros
  26. How I can select rows from a dataframe that do not match?
  27. Select last non-NA value in a row, by row
  28. How to append a whole dataframe to a CSV in R
  29. R how can I calculate difference between rows in a data frame
  30. Color one point and add an annotation in ggplot2?

Leave a Comment