powered by
data("DanishWelfare")
data("DanishWelfare") ftable(xtabs(Freq ~ ., data = DanishWelfare))
Run the code above in your browser using DataLab