# Copyright 2025, Gurobi Optimization, LLC## Formulate a simple linear program, solve it, and then solve it# again using the optimal basis.library(gurobi)model<-list()model$A<-matrix(c(1,3,4,8,2,3),nrow=2,byrow=T)model$obj<-c(1,2,3)model$rhs<-c(4,7)model$sense<-c('>','>')# First solve - requires a few simplex iterationsresult<-gurobi(model)model$vbasis<-result$vbasismodel$cbasis<-result$cbasis# Second solve - start from optimal basis, so no iterationsresult<-gurobi(model)# Clear spacerm(model,result)