r - 修改表格以获得绝对频率和相对频率

Question

我想在表格中显示绝对频率和相对频率。

我得到什么:

female   male 

314    577

[1] 891

[1] 0.352413

[1] 0.647587

我想要什么(空格不起作用，所以我用|分隔):

Sex | absolute Frequency | relative Frequency

male | 577 | 0.647587

female | 314 | 0.352413

代码:

table(titanic$Sex)
length(titanic$Sex)
length(which(titanic$Sex == "female")) / length(titanic$Sex)
length(which(titanic$Sex == "male")) / length(titanic$Sex)

Answer 1

library(dplyr)
library(titanic) 

df <- data.frame(table(titanic_train$Sex)) %>%
  mutate(Rel_Freq = Freq/sum(Freq)) %>%
  rename(Sex=Var1)
df

输出是:

     Sex Freq Rel_Freq
1 female  314 0.352413
2   male  577 0.647587