Nothing
### R code from vignette source 'clpAPI.Rnw'
###################################################
### code chunk number 1: clpAPI.Rnw:74-75
###################################################
library(clpAPI)
###################################################
### code chunk number 2: clpAPI.Rnw:78-79
###################################################
prob <- initProbCLP()
###################################################
### code chunk number 3: clpAPI.Rnw:82-83
###################################################
setObjDirCLP(prob, -1)
###################################################
### code chunk number 4: clpAPI.Rnw:86-88
###################################################
nc <- 3
nr <- 3
###################################################
### code chunk number 5: clpAPI.Rnw:92-93
###################################################
ia <- c(0, 1, 2, 0, 1, 2, 0, 1, 2)
###################################################
### code chunk number 6: clpAPI.Rnw:96-97
###################################################
ja <- c(0, 3, 6, 9)
###################################################
### code chunk number 7: clpAPI.Rnw:100-101
###################################################
ar <- c(2, 4, 3, 3, 1, 4, 1, 2, 2)
###################################################
### code chunk number 8: clpAPI.Rnw:104-105
###################################################
clb <- rep(0, 3)
###################################################
### code chunk number 9: clpAPI.Rnw:108-109
###################################################
rub <- c(5, 11, 8)
###################################################
### code chunk number 10: clpAPI.Rnw:112-113
###################################################
obj <- c(5, 4, 3)
###################################################
### code chunk number 11: clpAPI.Rnw:116-117
###################################################
loadProblemCLP(prob, nc, nr, ia, ja, ar, clb, NULL, obj, NULL, rub)
###################################################
### code chunk number 12: clpAPI.Rnw:120-121
###################################################
solveInitialCLP(prob)
###################################################
### code chunk number 13: clpAPI.Rnw:124-125
###################################################
getObjValCLP(prob)
###################################################
### code chunk number 14: clpAPI.Rnw:129-130
###################################################
getColPrimCLP(prob)
###################################################
### code chunk number 15: clpAPI.Rnw:134-135
###################################################
getColDualCLP(prob)
###################################################
### code chunk number 16: clpAPI.Rnw:138-139
###################################################
delProbCLP(prob)
###################################################
### code chunk number 17: clpAPI.Rnw:154-155
###################################################
help("Clp_addColumns")
###################################################
### code chunk number 18: clpAPI.Rnw:165-167
###################################################
c2r <- system.file(package = "clpAPI", "c2r.map")
source(c2r)
###################################################
### code chunk number 19: clpAPI.Rnw:170-172
###################################################
pr1 <- initProbCLP()
delProbCLP(pr1)
###################################################
### code chunk number 20: clpAPI.Rnw:175-177
###################################################
pr2 <- Clp_newModel()
Clp_deleteModel(pr2)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.