Adding R scripts