View source: R/appendSolution.R
appendSolution | R Documentation |
useSolver
outputAppend a useSolver
output of a successfully solved optimization problem to the initial item pool data.frame
.
appendSolution(solverOut, items, idCol)
solverOut |
Object created by |
items |
Original |
idCol |
Column name or column number in |
This function merges the initial item pool information in items
to the solver output in solverOut
.
A data.frame
.
## Example item pool items <- data.frame(ID = 1:10, itemValues = c(-4, -4, -2, -2, -1, -1, 20, 20, 0, 0)) ## Test Assembly usage <- itemUsageConstraint(nForms = 2, operator = "=", targetValue = 1, itemIDs = items$ID) perForm <- itemsPerFormConstraint(nForms = 2, operator = "=", targetValue = 5, itemIDs = items$ID) target <- minimaxObjective(nForms = 2, itemValues = items$itemValues, targetValue = 0, itemIDs = items$ID) sol <- useSolver(allConstraints = list(usage, perForm, target), solver = "lpSolve") ## Append Solution to existing item information out <- appendSolution(sol, items = items, idCol = 1)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.