# NOT RUN {
data(iris)
model <- darch(Species ~ ., iris, c(0, 50, 0),
darch.unitFunction = c("maxoutUnit", "softmaxUnit"),
darch.maxout.poolSize = 5, darch.maxout.unitFunction = "sigmoidUnit",
darch.weightUpdateFunction = c("weightDecayWeightUpdate", "maxoutWeightUpdate"))
# }
Run the code above in your browser using DataLab