Map a solved MPS back onto model symbols

Usage

read_mps_solution(
  sol,
  index_dir = NULL,
  col_index = NULL,
  row_index = NULL,
  base = NULL,
  format = c("parquet", "ipc", "csv"),
  solver = c("auto", "highs", "cuopt"),
  require_optimal = TRUE
)

Arguments

sol: Path to a HiGHS solution file, or the list returned by read_highs_solution().
index_dir: Directory holding the *_col_index / *_row_index tables written by write_mps(). Ignored when both index tables are supplied.
col_index, row_index: Index tables, if already in memory.
base: Basename used when the index files were written; inferred from the directory when there is exactly one candidate.
format: Storage format of the index tables.
solver: Which solver wrote sol; "auto" sniffs the file.
require_optimal: Passed to the reader.

Value

A list with objective, status, primal (j, symbol, name, value) and dual (i, symbol, name, value, marginal) - the same shape solve_highs() returns, so the two paths are interchangeable.

Examples

if (requireNamespace("highs", quietly = TRUE)) {
  dir <- tempfile("mps-")
  dir.create(dir)
  mps <- file.path(dir, "toy.mps")
  write_mps(example_models$toy, mps, format = "csv")
  run <- solve_mps(mps)
  sol <- read_mps_solution(run$sol_file, index_dir = dir, format = "csv")
  names(sol)
}
#> WARNING: Column names are not present, or contain duplicates: using names with prefix "c", beginning with suffix 0
#> 
#> WARNING: Row    names are not present, or contain duplicates: using names with prefix "r", beginning with suffix 0
#> 
#> Writing the model to C:\Users\admin\AppData\Local\Temp\RtmpgRRJWR\mps-ba24570c5ca2/toy.mps
#> 
#> [1] "objective" "status"    "primal"    "dual"      "col_index" "row_index"