Pass output controll to R scripts