Update draw_pca.R