geom_km function

Add a Kaplan-Meier survival curve