#1. klasifikasi (a) Jumlah komentar per unggahan = Diskrit (b) Durasi video yang ditonton = kontinu

#2 Binomial

n <- 10; p <- 0.25
dbinom(2, size = n, prob = p)  #a Menghitung P
## [1] 0.2815676
n * p                          #b Menghitung Rata-rata
## [1] 2.5
sqrt(n * p * (1 - p))
## [1] 1.369306

#3 poisson menghitung P(lebih dari 12 unggahan)

lambda <- 8
1 - ppois(12, lambda)  #P(x>12)
## [1] 0.0637972

#4 (Normal & Z)

mu <- 3; sigma <- 0.5
pnorm(4, mean = mu, sd = sigma, lower.tail = FALSE)      #P(X>4)
## [1] 0.02275013
qnorm(0.95, mean = mu, sd = sigma)                       #batas waktu
## [1] 3.822427