解最优化的。我在2.9下会报错，你看看运行下面的代码会不会有问题：
p <- c(-10,10) <br />
par.l <- c(0,0); par.u <- c(100,100) <br />
<br />
lin.u <- 1; lin.l <- 1 <br />
A <- t(c(1,1)) <br />
<br />
fn <- function(x){ <br />
x[1]^2+x[2]^2 <br />
} <br />
ret <- donlp2(p, fn, par.lower=par.l, par.upper=par.u, <br />
A=A, lin.u=lin.u, lin.l=lin.l, name="simple") <br />
<br />
