Ex1

TRUNG BÌNH CỦA GIÁ TRỊ DƯƠNG

#Các giá trị ngẫu nhiên từ phân phối chuẩn bằng hàm rnorm()
x <- rnorm(100)
#Thay x âm bằng Not Available
x[x < 0] <- NA
#TBC số dương
mean(x, na.rm = TRUE)

## [1] 0.6807755