# Create a marginal table for 2 MRCVs
farmer.mtable <- marginal.table(data = farmer2, I = 3, J = 4)
farmer.mtable
# Create a marginal table for 3 MRCVs
farmer.mtable.three <- marginal.table(data = farmer3, I = 3, J = 4, K = 5)
farmer.mtable.threeRun the code above in your browser using DataLab