Question 16 (1 point) 1) Listen How do you calculate the value x that cuts an area of 0.1 to the right of x under the density curve of the chi-square distribution with 1 degree of freedom? pchisq(p=0.1,df=1) qchisq(p=0.1,df=1) qchisq(p=0.9,df=1) Question 15 (1 point) Listen ? How do you calculate the value x that cuts an area of 0.975 to the left of x under density curve of the normal distribution? qnorm(p=0.975) rnorm(p=0.975) pnorm(p=0.975) Question 14 (1 point) Listen I have a dice (6 faces numbered 1 to 6) that is very curious. I have thrown this dice 1000000 times and never observed the 2 outcome nor the 4 outcome. Which of the following codes is most likely to model 20 runs of this dice? sample(1:6, size = 20, replace = FALSE, prob=c(.5,0,.2,0,.4,.3)) sample(1:6, size = 20, replace = TRUE, prob=cl.1,2,0,.2,.2,.3)) sample(1:6, size = 20, replace = TRUE, prob=cl.1,0,2,0,.4,.3)) Question 13 (1 point) Listen ? Suppose I have 6 letters: 'a', 'b'... to 'f. I want to sample 5 random letters without replacement. Which code should I use? sample(c('a'b'c','d', 'e'f'), size = 5, replace = FALSE) sample(c(af), size = 5, replace = FALSE) sample(c(a,b,c,d,e,f), size = 6)