A random collection of small R scripts