contingency_table_by function

Create data frame formed like a contingency-table