update Panel plot in R