if (FALSE) {
makeMarginMap(getDimTypes(cat_by_cat_cube))
# 1 2
makeMarginMap(getDimTypes(MR_by_cat_cube))
# 1 1 2
makeMarginMap(getDimTypes(cat_by_MR_cube))
# 1 2 2
makeMarginMap(getDimTypes(MR_by_MR_cube))
# 1 1 2 2
}
Run the code above in your browser using DataLab