R で IPTW カプランマイヤー曲線グラフに Number at Risk を書き入れる方法

IPTW カプランマイヤー曲線において、任意の時点における Number at Risk を書き入れる方法 R で作成する方法