tests/Gwen.R

## private communication from Gwen (gleday <gleday@few.vu.nl>) via Kurt Hornik
## produced an endless loop on some platforms.

library(quadprog)
load("bug.RData")
sol <- solve.QP(Dmat, as.vector(dvec), Amat, bvec, meq=meq)
print(lapply(sol, zapsmall))

Try the quadprog package in your browser

Any scripts or data that you put into this service are public.

quadprog documentation built on Nov. 20, 2019, 9:06 a.m.