Corrected solution of mathprog model file in optimize method
Require ggplot