Extract the objective value of a solution generated using the CBC (COIN-OR branch and cut) solver (via cbc_solve).

objective_value(result)

Arguments

result

CBC result (rcbc_milp_result) object.

Value

A numeric value.

Examples

# \dontrun{
# Define optimization problem
## max 1 * x + 2 * y
## s.t.
##   x + y <= 1
##   x, y integer

# Generate solution
A <- matrix(c(1, 1), ncol = 2, nrow = 1)
result <- cbc_solve(
  obj = c(1, 2),
  mat = A,
  is_integer = c(TRUE, TRUE),
  row_lb = c(-Inf),
  row_ub = c(1),
  max = TRUE)

# Extract objective value
objective_value(result)
#> [1] 2
# }