changed R scripts directory