DF = read.csv( "../../Data/wine.csv", header=TRUE )

pairs(DF)

m1 = lm(Price ~ ., data=DF)
print(summary(m1))

plot(m1, which=1)

print(DF[c(89, 85, 84), ])


m2 = lm(Price ~ ., data=DF[c(-89), ])
print(summary(m2))

plot(m2, which=1)