data=read.delim("exer4_76.dat")
str(data)
## 'data.frame': 24 obs. of 2 variables:
## $ DISTANCE: num 0.032 0.034 0.214 0.263 0.275 0.275 0.45 0.5 0.5 0.63 ...
## $ VELOCITY: int 170 290 -130 -70 -185 -220 200 290 270 200 ...
plot(data,
pch=7,
cex=1.5,
col="green",
bg="red",
xlab="Distance",
ylab="Recession Velocity",
main="Relationship Between Distance and Radial Velocity")