#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