Kaplan-Meier Plot with ggplot2

The function jskm() creates publication quality Kaplan-Meier plot with at risk tables below. svyjskm() provides plot for weighted Kaplan-Meier estimator.