powered by
AdjustSchneiderOrelli(smoothedObservedProportion, ps0 = smoothedObservedProportion[1], p1 = 1)