Neat output! Thanks.

]]>http://jcarroll.com.au/2016/04/27/solving-inequality-the-math-kind/

]]>Ah!, trust wordpress for botching R code… I updated the code but some garbage may remain….

]]>” cost=f.con%*%c(a,b,k,d)-f.rhs

if (max(cost)<=0){ gain=f.obj%*%c(a,b,k,d) if"

AND a simple insepction of that code shows you have 3 open curly brackets, {, and only 2 close, },.

Would appreciate some help. Thanks.

Thanks!

]]>Sure. The main point in writing these little pieces of code is to have illustrations at the ready for my students in my R course!

]]>Just a quick note on the right hand side vector should be f.rhs<-c(100,0,1,8,4) ]]>