add.constraint {lpSolveAPI}R Documentation

Add Constraint

Description

Add a constraint to an lpSolve linear program model object.

Usage

add.constraint(lprec, xt, type = c("<=", "=", ">="), rhs, indices = 1:n, lhs)

Arguments

lprec an lpSolve linear program model object.
xt a numeric vector containing the constraint coefficients (only the nonzero coefficients if indices is also given). The length of xt must be equal to the number of decision variables in lprec unless indices is provided.
type a numeric or character value from the set {1 = "<=", 2 = ">=", 3 = "="} specifying the type of the constraint.
rhs a single numeric value specifying the right-hand-side of the constraint.
indices a numeric vector the same length as xt of unique values from the set {1, ..., n} where n is the number of decision variables in lprec; xt[j] becomes the constraint coefficient for variable indices[j]. The constraint coefficients for the decision variables not in indices are set to zero.
lhs optional. A single numeric value specifying the left-hand-side of the constraint.

Details

Specifying the objective function before adding constraints will improve the performance of this function.

The use of this function should be avoided when possible. Building a model column-by-column rather than row-by-row will be on the order of 50 times faster (building the model - not solving the model).

Value

a logical value is invisibly returned: TRUE indicates that the operation was successful and FALSE indicates that an error occurred.

Author(s)

Kjell Konis kjell.konis@epfl.ch

References

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

Examples

lps.model <- make.lp(0, 4)
set.objfn(lps.model, rep(1, 4))

xt <- c(6,2,4,9)
add.constraint(lps.model, xt, "<=", 50)

yt <- c(3,1,5)
ind <- c(1,2,4)
add.constraint(lps.model, yt, 2, 75, ind)

[Package lpSolveAPI version 5.5.0.14 Index]