R kode til eksempel 9.10

# Vi ser p? testing av H₀ : m =2.5 mot H_a : m > 2.5

# Vi har at n = 10 og s = 0.10.

# Vi finner styrken til testen n?r m =2.6

# (Sannsynligheten for feil av type II er ?n minus teststyrken)

power.t.test(n=10,delta=0.1,sd=0.1,power=NULL,

???????????? type="one.sample",alternative="one.sided")

# Vi finner? n slik at testen f?r styrke 95% n?r m =2.6

power.t.test(n=NULL,delta=0.1,sd=0.1,power=0.95,

???????????? type="one.sample",alternative="one.sided")