Over the past couple of months I have observed James of plusSixOne fame, create and extend the great R package for AFL stats called fitzRoy. It has been some time since I have used R and it took me a while to get up and going. Along my journey, I have tinkered with a Docker image for fitzRoy. This was primarily due to my use containers in my day to day work and wanting to isolate any of the dependencies.
A quick introduction
First, grab the image.
docker pull thetinytechco/fitzroy:rstudio
Then if you want to tinker with fitzRoy, run the following and open a browser at http://localhost:8787. The default username & password is as follows (
Username: rstudio, Password: rstudio).
docker run -d -p 8787:8787 --name fitzroy thetinytechco/fitzroy:rstudio
Then start playing with some of the examples from here.
library(fitzRoy) library(tidyverse) df<-fitzRoy::afldata df%>% select(Season, First.name, Surname, Goals)%>% group_by(Season, First.name, Surname)%>% summarise(average_goals=mean(Goals))%>% filter(First.name %in% c("Tony", "Jason") , Surname %in% c("Lockett", "Dunstall"))%>% ggplot(aes(x=Season, y=average_goals)) + geom_point(aes(colour=Surname)) + ggtitle("Average Goals Per Game by Season")