R code from when I did undergraduate research and various miscellany