- A special function:
summarise
or summarize
library(dplyr)
baseball <- read.csv("../data/baseball.csv")
summarise(baseball, ab=mean(h/ab, na.rm=T))
## ab
## 1 0.2339838
summarise(baseball,
ba = mean(h/ab, na.rm=T),
games = sum(g, na.rm=T),
hr = sum(hr, na.rm=T),
ab = sum(ab, na.rm=T))
## ba games hr ab
## 1 0.2339838 1580070 113577 4891061
summarise(subset(baseball, id=="sosasa01"),
ba = mean(h/ab, na.rm=T),
games = sum(g, na.rm=T),
hr = sum(hr, na.rm=T),
ab = sum(ab, na.rm=T))
## ba games hr ab
## 1 0.2681506 2354 609 8813