Initial commit of R scripts.