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