fix options
fix R code