THUC HANH

#NHẬP LIỆU
likert=file.choose()
datalikert=read.csv(likert,header=TRUE)
save(datalikert,file="datalikert.rda")
#attach để khỏi phải $likert
attach(datalikert)
#is để ktra đúng dữ liệu k
is.data.frame(datalikert)

## [1] TRUE