Multivariate Regression

multivariate

# details about dataset available http://archive.ics.uci.edu/ml/datasets/Housing

housing <- read.table("http://archive.ics.uci.edu/ml/machine-learning-databases/housing/housing.data")
names(housing) <- c("CRIM", "ZN", "INDUS", "CHAS", "NOX", "RM", "AGE", "DIS", "RAD", "TAX", "PTRATIO", "B", "LSTAT", "MEDV")

# Subset the data for our model
housing <- housing[, c("CRIM", "RM", "PTRATIO", "LSTAT", "MEDV")]

plot(housing)

# Look at the linear model
housing.lm = lm(MEDV ~ CRIM + RM + PTRATIO + LSTAT, data=housing)
summary(housing.lm)