R/categorical.R

In mrmaxent/maxnet: Fitting 'Maxent' Species Distribution Models with 'glmnet'

Defines functions categorical

Documented in categorical

#' @rdname hinge
#' @export
categorical <-
function(x)
{
   f <- outer(x, levels(x), function(w,f) ifelse(w==f,1,0))
   colnames(f) <- paste("", levels(x), sep=":")
   f
}