# solve.lpExtPtr: Solve a Linear Program In lpSolveAPI: R Interface to 'lp_solve' Version 5.5.2.0

## Description

Attempt to compute the optimal solution of an lpSolve linear program model object.

## Usage

 ```1 2``` ```## S3 method for class 'lpExtPtr' solve(a, b, ...) ```

## Arguments

 `a` an lpSolve linear program model object. `b` this argument is ignored. `...` additional arguments are ignored.

## Value

a single integer value containing the status code.

## Status Codes

 0: "optimal solution found" 1: "the model is sub-optimal" 2: "the model is infeasible" 3: "the model is unbounded" 4: "the model is degenerate" 5: "numerical failure encountered" 6: "process aborted" 7: "timeout" 9: "the model was solved by presolve" 10: "the branch and bound routine failed" 11: "the branch and bound was stopped because of a break-at-first or break-at-value" 12: "a feasible branch and bound solution was found" 13: "no feasible branch and bound solution was found"

## Author(s)

Kjell Konis [email protected]

## References

http://lpsolve.sourceforge.net/5.5/index.htm

## Examples

 ``` 1 2 3 4 5 6 7 8 9 10``` ```lps.model <- make.lp(0, 3) xt <- c(6,2,4) add.constraint(lps.model, xt, "<=", 150) xt <- c(1,1,6) add.constraint(lps.model, xt, ">=", 0) xt <- c(4,5,4) add.constraint(lps.model, xt, "=", 40) set.objfn(lps.model, c(-3,-4,-3)) solve(lps.model) ```

### Example output

```[1] 0
```

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