* do-file for Supplementary Exercise 6.115 of IPS7e
version 18 /* works also with versions 13-17 */

* using either the command or the Power and sample size menu
power onemean 450 460, n(500) alpha(0.01) sd(100) knownsd onesided