テーブルを修正して絶対周波数と相対周波数を得る

Question

私はRで初めてです。何か助けが必要です。絶対周波数と相対周波数をテーブルに表示したいと思います。

female male 

314 577 

[1] 891 

[1] 0.352413 

[1] 0.647587 

私が欲しいもの：：|私はそれを分割しての空白は仕事をdoesntの私は何を得る

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

これは動作するはずです：

まず、メスとオスの数をカウントし、data.frameに

result <- as.data.frame(table(titanic$Sex)) 

を結果を変換します

第2に、相対頻度行数で除算してdata.frameに追加します。

result$rel_freq <- result$Freq/nrow(titanic) 

最後に、必要に応じてあなたの例では、正確なものに列名を変更することができます。

colnames(result) <- c('Sex', 'absolute Frequency', 'relative Frequency') 

もっと面白い方法がありますか？

Answer 2

希望します。

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