Đây là thử nghiệm với chữ ế, ư, ă, đ, ô.
library(datasets)
data("airquality")
head(airquality)
a <- airquality
dim(a)
## [1] 153 6
table(cut(a$Ozone, 3))
##
## (0.833,56.7] (56.7,112] (112,168]
## 83 28 5
Đây là bản tần số của biến Ozon bằng 3 khoảng