R help - Mar 2003 - solve lagrange

Hi!
Anyone can help me solving a Lagrangian function in R?
Should I use <deriv> and then <optim> by including the
further conditions or is there an other way?
Thanks
Meinhard