R/elmtrain.formula.R

In elmNN: Implementation of ELM (Extreme Learning Machine ) algorithm for SLFN ( Single Hidden Layer Feedforward Neural Networks )

Defines functions elmtrain.formula

Documented in elmtrain.formula

elmtrain.formula <-
function(formula,data,nhid,actfun,...) {
  mf <- model.frame(formula=formula, data=data)
  x <- model.matrix(attr(mf, "terms"), data=mf)
  y <- model.response(mf)
  model <- elmtrain.default(x=x,y=y,nhid=nhid,actfun=actfun, ...)
  model$call <- match.call()
  model$formula <- formula
  model
}

Try the elmNN package in your browser