知道nlminb可以求解最小值。比如下例：
f<-function(x){
  
  x[1]^2-x[2]^3+x[3]^4+x[1]*x[2]
}
##利用nlminb
f.res<-nlminb(c(0.5,1,1),f,lower=c(-1,-2,1),
                upper=c(1,2,3))


##结果为
$par
[1] -1  2  1




现在问题是，如果对变量有约束条件：x[1]+x[2]+x[3]=1, 要怎么求解最优解呢？？


实在是迷茫啊，求指导啊，谢谢！！