分配因子水平權重

Question

我有兩個因素變量，兩個級別的性別和四個級別的婚姻，並且在數據框中具有相應的頻率。 我想使用這些頻率構造一個2向列聯表。 有人可以幫忙嗎？

 marital <- c("Single (M1)","Single (M1)", "Married (M2)","Married (M2)", 

"Vdowed (M3)","Vdowed (M3)", "Divorced (M4)", "Divorced (M4)")
    gender <- c("Male (S1)", "Female (S2)")
    freq <- c(129, 104, 298, 305, 13, 57, 40, 54)

    df <- data.frame(marital, gender, freq)
    View(df)
    table(df$marital,  df$gender)

Answer 1

您可以使用tidyr::spread ：

library(tidyr)

df %>% spread(gender, freq)

        marital Female (S2) Male (S1)
1 Divorced (M4)          54        40
2  Married (M2)         305       298
3   Single (M1)         104       129
4   Vdowed (M3)          57        13