I'd like to use components of r function at Rcpp

Question

This is my cpp code.. using lp function (with lpSolve package)

I\'d like to assign the \'solution\' component of lp results.

which is the part of "lp(~~~)$sol