data=read.delim("exer4_75.dat")
str(data)
## 'data.frame': 10 obs. of 2 variables:
## $ USAGE : int 13 10 20 28 32 17 24 31 40 38
## $ EXPENSE: num 17 22 30 37 47 30.5 32.5 39 51.5 40
plot(data,
pch=24,
cex=1.5,
col="violetred",
bg="blue",
xlab="Weekly Usage in Hours",
ylab="Annual Expense",
main="Maintenance Expenses vs Usage")