#HO VA TEN : NGUYEN THI HA MY
#LOP :24NH1
# BAI KIEM TRA THỰC HANH
#Nhap lieu
likert = file.choose()
datalikert=read.csv(likert,header = TRUE)
save(datalikert,file="datalikert.rda")
attach(datalikert)
is.data.frame(datalikert)
head(datalikert)
dim(datalikert)
#Câu 16
mreg=lm(Ftb~Atb+Btb+Ctb)
summary(mreg)
op=par(mfrow=c(2,2))
plot(mreg)