BTVN MÔ PHỎNG ÍT NHẤT 5 BIẾN NGẪU NHIÊN (CÓ PHÂN PHỐI XÁC SUẤT KHÁC NHAU), MÔ PHỎNG, VẼ ĐỒ THỊ, TÍNH TOÁN CÁC ĐẶC TRƯNG ĐO LƯỜNG VÀ GIẢI THÍCH Ý NGHĨA

  1. PHÂN PHÔI NHỊ THỨC ÂM
a <- rbinom (200, size = 50, prob = .25)
hist(rbinom(200, size = 50, prob = .25))

summary(a)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##     5.0    10.0    12.0    12.3    15.0    20.0
  1. PHÂN PHỐI POISSON
b <- rpois (200, lambda = 5)
hist(rpois(200, lambda = 5))

summary(b)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   1.000   4.000   5.000   5.155   6.250  12.000
  1. PHÂN PHỐI ĐỀU LIÊN TỤC
c <- runif( n = 200, min = 15, max = 35)
hist(runif( n = 200, min = 15, max = 35))

summary(c)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   15.01   19.52   23.70   24.49   29.29   34.90
  1. PHÂN PHỐI CHUẨN
d <- rnorm( n = 115, mean = 100, sd = 15)
hist(rnorm( n = 115, mean = 100, sd = 15))

summary(d)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   52.97   88.04   98.42   99.50  110.77  136.84
  1. PHÂN PHỐI BETA
e <- rbeta (n = 200, shape1 = 50, shape2 = 100)
hist(rbeta (n = 200, shape1 = 50, shape2 = 100))

summary(e)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##  0.2190  0.3089  0.3351  0.3370  0.3666  0.4287