This is a heavily interactive web application, and JavaScript is required. Simple HTML interfaces are possible, but that is not what this is.
Post
Uri Simonsohn
urisohn.bsky.social
did:plc:mg6k6llb5ruhhf5vxh3pvqkz
A bit of an evergreen.
When power is x%, the share of p<.01 among p<.05 results is approximately x%
R Code:
ncp=seq(0,4,.01)
power05 =(1-pt(qt(.975,df=5000),df=5000,ncp=ncp))
power01 = (1-pt(qt(.995,df=5000),df=5000,ncp=ncp))
share01 = power01/power05
2024-02-22T14:50:38.488Z