search for: conlamb

Displaying 1 result from an estimated 1 matches for "conlamb".

2009 Sep 17
0
lpSolve constraints don't seem to have an effect
...=0.25)) con <- c(G1,G2,1) # slack variable included obj <- c(F1,F2) # Defining the constraints lambdasx2 <- diag(1,ncol=19,nrow=19) lambda1x2 <- c(rep(1,times=9),rep(0,times=9),0) lambda2x2 <- c(rep(0,times=9),rep(1,times=9),0) lambdamatrix <- rbind(lambda1x2,lambda2x2,lambdasx2) conlamb <- rbind(con,lambdamatrix) # Defining the right-hand side rightside <- c(6,1,1,rep(0,times=19)) # Defining the directions direc <- c("=","=","=",rep(">=",times=19)) # LP lp("max",obj,conlamb,direc,rightside)$solution # But I receive...