R Notebook

# train = trainingSet
# test = testSet 
# price = class to predict 
# Fit lm model on train: model
model <- lm(price ~ ., train)
# Predict on test: p
p <- predict(model, test)