R/name.lp.q

name.lp <- function(lprec, name)
{
  if(missing(name))
    return(.Call(RlpSolve_get_lp_name, lprec))

  .Call(RlpSolve_set_lp_name, lprec, as.character(name))

  invisible()
}

Try the lpSolveAPI package in your browser

Any scripts or data that you put into this service are public.

lpSolveAPI documentation built on May 2, 2019, 6:50 p.m.