4 plots - r code plus png files