data for r scirpts