The data analysis can be found in this R markdown file.