Create r_QAQC_script.r