Displaying 1 result from an estimated 1 matches for "tp4646383".
Did you mean:
tp4646038
2012 Oct 16
2
Penalty function constrained optimization
...ce-cost +???????1000*sum(max(0,(f-9))^2
return(sum(d.NR*d.NR))}
zero.bnd <- rep.int(0, length(f))
opt.eff <- optim( init.eff, obj, method="Nelder-Mead" )
Thanks very much!
--
View this message in context: http://r.789695.n4.nabble.com/Penalty-function-constrained-optimization-tp4646383.html
Sent from the R help mailing list archive at Nabble.com.