8 lines
216 B
R
8 lines
216 B
R
|
alpha=0.0003
|
||
|
|
lower=qnorm(alpha,mean=0,sd=1)
|
||
|
|
upper=qnorm(1-alpha,mean=0,sd=1)
|
||
|
|
|
||
|
|
message(paste0("Rejection region left tail Z in ]-inf,",lower,"]"))
|
||
|
|
message(paste0("Rejection region right tail Z in [",lower,",+inf["))
|
||
|
|
|