correction_R library