R code for computational finance