R_fact_1 done.