Discussion 3

sum(dbinom(x = 3:20,
       size = 20,
       prob = .30))

## [1] 0.9645169

pbinom(q = 2, 
       size = 20, 
       prob = .30, 
       lower.tail = FALSE)

## [1] 0.9645169