7 lines
216 B
R
7 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["))
|
|
|