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
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
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
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
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
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