datafile1=read.csv("/Users/theanh/Downloads/Likert.csv",header=TRUE)
save(datafile1,file="datafile1.rda")
attach(datafile1)
is.data.frame(datafile1)
## [1] TRUE