Update figures_dpe.R

Not tested