# NOT RUN {
library(neuralnet)
library(dummies)
library(dplyr)
x <- nn_model('iris', 'Petal.Length','modelo.nn', 'mean.nn', 'sd.nn', 0.05, 2000, 3, 10, 10, 10)
exe(x)
x <- nn_plot('modelo.nn')
exe(x)
# }
Run the code above in your browser using DataLab