R/get.bounds.q

Defines functions get.bounds

Documented in get.bounds

get.bounds <- function(lprec, columns = 1:n)
{
  n <- dim(lprec)[2]

  if(n < 1)
    columns <- integer(0)

  lower <- .Call(RlpSolve_get_lowbo, lprec, as.integer(columns))
  upper <- .Call(RlpSolve_get_upbo, lprec, as.integer(columns))

  list(lower = lower, upper = upper)
}

Try the lpSolveAPI package in your browser

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

lpSolveAPI documentation built on May 30, 2017, 7:12 a.m.