Minor changes to R scripts.
Minor changes to some R scripts