R/zzz.R

In ROI.plugin.clp: 'Clp (Coin-or linear programming)' Plugin for the 'R' Optimization Interface

make_LP_signatures <- function() {
  ROI_plugin_make_signature(objective = c("L"),
                             constraints = c("X", "L"),
                             types = c("C"),
                             bounds = c("X", "V"),
                             cones = c("X", "free"),
                             maximum = c(TRUE, FALSE))
}


.onLoad <- function( libname, pkgname ) {
  ## Solver plugin name (based on package name)
  if( ! pkgname %in% ROI_registered_solvers() ){
    ## Register solver methods here.
    ## One can assign several signatures a single solver method
    solver <- ROI_plugin_get_solver_name( pkgname )
    ROI_plugin_register_solver_method( signatures = make_LP_signatures(),
                                        solver = solver,
                                        method =
                                          getFunction( "solve_OP", where = getNamespace(pkgname)) )
    ## Finally, for status code canonicalization add status codes to data base
    .add_status_codes()
    .add_controls()
  }
}