Tugas matkul komputasi statistika

#Diskrit
#Distribusi Binomial
# X ~ Binomial(n = 10, p = 0.3)
dbinom(3, size = 10, prob = 0.3) # P(X = 3)

## [1] 0.2668279

pbinom(3, size = 10, prob = 0.3) # P(X <= 3)

## [1] 0.6496107

qbinom(0.5, size = 10, prob = 0.3) # kuantil pada peluang 0.5

## [1] 3

rbinom(5, size = 10, prob = 0.3) # 5 data acak binomial

## [1] 6 1 2 3 6

#Distribusi Poisson
# X ~ Poisson(lambda = 4)
dpois(2, lambda = 4) # P(X = 2)

## [1] 0.1465251

ppois(2, lambda = 4) # P(X <= 2)

## [1] 0.2381033

qpois(0.5, lambda = 4) # kuantil pada peluang 0.5

## [1] 4

rpois(5, lambda = 4) # 5 data acak Poisson

## [1]  4  4  2 11  6

#Kontinu
#Distribusi Normal
# X ~ Normal(mean = 27, sd = 1.5) -- suhu udara harian (°C)
dnorm(28, mean = 27, sd = 1.5) # kepadatan peluang pada x = 28

## [1] 0.2129653

pnorm(28, mean = 27, sd = 1.5) # P(X <= 28)

## [1] 0.7475075

qnorm(0.95, mean = 27, sd = 1.5) # nilai x pada persentil ke-95

## [1] 29.46728

rnorm(5, mean = 27, sd = 1.5) # 5 data acak normal

## [1] 28.98565 25.54628 28.35213 29.58645 25.86950

#Distribusi Uniform dan Eksponensial
# Uniform: X ~ Uniform(min = 0, max = 10)
dunif(5, min = 0, max = 10)

## [1] 0.1

punif(5, min = 0, max = 10)

## [1] 0.5

runif(5, min = 0, max = 10)

## [1] 4.562622 7.668009 5.496111 1.886583 3.358201

# Eksponensial: X ~ Exponential(rate = 0.5)
dexp(2, rate = 0.5)

## [1] 0.1839397

pexp(2, rate = 0.5)

## [1] 0.6321206

rexp(5, rate = 0.5)

## [1] 3.5077442 0.8942791 1.7504755 3.4848867 1.0246209