Skip to content
Snippets Groups Projects
Commit b45b88db authored by Claus Jonathan Fritzemeier's avatar Claus Jonathan Fritzemeier
Browse files

change to moma class (factor 2 cancelling out)

parent 3fdb646f
No related branches found
No related tags found
No related merge requests found
...@@ -92,7 +92,8 @@ setMethod(f = "initialize", ...@@ -92,7 +92,8 @@ setMethod(f = "initialize",
} }
if (is.null(Qmat)) { if (is.null(Qmat)) {
Q <- rep(2, nCols) # Q <- rep(2, nCols)
Q <- rep(1, nCols)
} }
else { else {
Q <- Qmat Q <- Qmat
...@@ -156,7 +157,8 @@ setMethod(f = "initialize", ...@@ -156,7 +157,8 @@ setMethod(f = "initialize",
ub = uppbnd(model), ub = uppbnd(model),
lb = lowbnd(model), lb = lowbnd(model),
#obj = -2 * wtsol, #obj = -2 * wtsol,
obj = (-2 * wtsol) * sdf, #obj = (-2 * wtsol) * sdf,
obj = (-1 * wtsol) * sdf,
rlb = rep(0, nRows), rlb = rep(0, nRows),
rtype = rep("E", nRows), rtype = rep("E", nRows),
lpdir = "min", lpdir = "min",
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment