data=read.delim("exer4_74.dat",header=TRUE)
str(data)
## 'data.frame': 12 obs. of 2 variables:
## $ STRESS: num 6.5 4 2.5 7.2 8.1 3.4 5.5 9.1 7.5 3.8 ...
## $ EXAM : int 81 96 93 68 63 84 71 57 70 86 ...
plot(data,
pch=9,
cex=1.5,
col="blue",
xlab="Stress Test Score",
ylab="Math Test Score",
main="Correlation Between Stress and Test Scores")