R: Solve a Linear Program

solve.lpExtPtr {lpSolveAPI} | R Documentation

## Solve a Linear Program

### Description

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

### Usage

    ## 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 kjell.konis@me.com

### References

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

### Examples

    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)

[Package lpSolveAPI version 5.5.2.0-17.7 Index]