Update event_pie.r

Made things a bit prettier with the PDF output