I'm trying to recreate the graph from here using equations (2) and (3), but I've yet to do so successfully. I'm not sure that equation (2) is correct. I traced it back to the original source here (see equation 7.39) where an unbiasing constant $c_5$ is used.
Am I missing something with how I'm supposed to calculate/apply the unbiasing constant in this formula? I just don't see how they arrive at the graph using the formulas on the Mathworld page.
Plot[Evaluate@Table[f[s, n, 1], {n, 2, 12, 2}], {s, 0, 2}]
. $\endgroup$