Frequenzzählung mit mehreren Bedingungen R

Question

Haben Sie einen Datenrahmen

Date   Team   Opponent Weather Outcome 
2017-05-01 All Stars  B Stars  Rainy  1 
2017-05-02 All Stars  V Stars  Rainy  1 
2017-05-03 All Stars  M Trade  Sunny  0 
. 
. 
2017-05-11 All Stars  Vdronee  Sunny  0 

Wo Ergebnis 1 einen Gewinn anzeigt. Ich habe die Tabellenfunktion verwendet, um die Frequenz und den angewandten Zustand zu erhalten.

table(df$Outcome, df$Team == "All Stars") 

Gibt mir dieses

FALSE TRUE 
    0 1005 30 
    1 1323 57 

So Häufigkeit der Sieg ist 57/87 = 0,655

Zwei Fragen:

vielmehr die den Gewinn Frequenz Berechnung manuell, wie kann ich bette das direkt in eine Formel ein?

und

Wie kann ich auf die x jüngsten Beobachtungen Filter? also so etwas wie

table(df$Outcome, df$Team == "All Stars" & df$date = filtering for the 5 most recent observations) 

dank

Answer 1

Eine Option ist data.table

libray(data.table) 
dt <- data.table(df) 
dt[, .(prop=sum(outcome)/.N),Team] 

zu verwenden, um die 5 neuesten Beobachtungen erhalten Sie die folgenden Möglichkeiten:

dt[,head(.SD,5),by=.(Team,Date)][,.(prop=sum(outcoume/.N),Team]