Basic usage of 'caret' package with artificial neural net from 'nnet' package

caret_nnet_ANN

#########################
# find and load packages
#########################

install.packages(c("nnet","caret"))
library(caret) 

###################
# Build neural net
###################

formula <- mpg ~ cyl + disp + hp + wt + gear
net <- train(formula, data = mtcars, method = "nnet", linout = TRUE)


##################
# Use neural net
##################

new_data <- data.frame(cyl = 4, disp = 320, hp = 140, wt = 3.4, gear = 4)
predict(net, new_data) # predicts 25.67


######################
# Build linear regr, 
# and predict
######################


lm1 <- lm(formula, data = mtcars)
predict(lm1, new_data) # predicts 23.49