21. If 13 people are selected at random and with replacement, which of the following lines of R code computes the probability that up to 7 of them have favorite color red?

A. pbinom(7, n=13, prob=0.25, lower.tail=FALSE)

B. dbinom(7, n=13, prob=0.25)

C. pnorm(7, mu=13, sigma=0.25, lower.tail=FALSE)

D. pbinom(7, n=13, prob=0.25)

E. pnorm(7, mu=13, sigma=0.25)

F. dnorm(7, mu=13, sigma=0.25)

22. If 13 people are selected at random and with replacement, which of the following lines of R code computes the probability that more than 7 of them have favorite color red?

A. pnorm(7, mu=13, sigma=0.25)

B. pbinom(7, n=13, prob=0.25)

C. dnorm(7, mu=13, sigma=0.25)

D. pbinom(7, n=13, prob=0.25, lower.tail=FALSE)

E. pnorm(7, mu=13, sigma=0.25, lower.tail=FALSE)

F. dbinom(7, n=13, prob=0.25)