Added comments to R scripts