To install:
devtools::install_github("petestmarie/petemisc")
fwr()
fwr(n, d, ud, ttail = 0.975)
Calculates power and omega from Liu, Implications of statistical power for confidence intervals, British Journal of Mathematical and Statistical Psychology (2012), 65, 427–437