Update Count_script_R-P-PA