examsquiz = read.table("examsquiz.txt", header = FALSE)
class(exxamsquiz)
head(examsquiz)
lma <- lm(examsquiz[,V2]~examsquiz[,V1])
lma <- lm(examsquiz$V2L~examsquiz$V1)
attributes(lma)
#after lma its not working but as in book it says same code works !!