Update general_ploting.R