<div dir="ltr">Andre,<div><br></div><div>Altere sua função fxy para</div><div><br></div><div><div>fxy=function(x) -x[1]^2 - x[2]^2</div><div><br></div><div>e a tua maximização vai funcionar.</div></div><div><br></div><div>Para colocar a escala no eixo (se é que entendi corretamente a sua dúvida), rode o comando</div><div><br></div><div>persp(x[, 1], x[, 2], -z, theta=30, phi=30, col="green", xlab="X", ylab="Y", zlab="Produção", ticktype="detailed")<br></div><div><br></div><div><br></div><div><br></div></div><div class="gmail_extra"><br><div class="gmail_quote">2015-05-17 18:36 GMT-03:00 Andre Oliveira <span dir="ltr"><<a href="mailto:andreolsouza@yahoo.com.br" target="_blank">andreolsouza@yahoo.com.br</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div style="color:#000;background-color:#fff;font-family:bookman old style,new york,times,serif;font-size:16px"><div><span>Pessoal,</span></div><div dir="ltr"><span>como devo escrever a função fxy para que o optim pegue fxy e maximize mesma? Estou pesquisando aqui, mas não consegui. Este é um exemplo apenas para fins didáticos! </span></div><div dir="ltr">x = seq(-2,2,length=20) <br></div><div>y = seq(-2,2,length=20) </div><div>f = function(x,y){ </div><div> fxy = -x^2 - y^2 </div><div>  return(fxy) </div><div>} </div><div>z = outer(x,y,f) </div><div>persp(x,y,z,theta=30,phi=30, col="green",xlab="x",ylab="Y",zlab="Produção") # Gostaria de acrescentar a escala no eixo!</div><div><br></div><div><br></div><div>fxy=function(x,y) -x^2 - y^2</div><div><br></div><div>optim(c(2,2),fxy, method="BFGS", control=list(fnscale=-1))  </div><div dir="ltr"><br></div><div><div dir="ltr">
obrigado <br>
<br><br></div></div></div></div><br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature"><div dir="ltr">Marcus Nunes<br><a href="http://marcusnunes.me/" target="_blank">http://marcusnunes.me/</a><br></div></div>
</div>