<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman, new york, times, serif;font-size:12pt"><DIV></DIV>
<DIV>Boa tarde caros membros</DIV>
<DIV>Alguém poderia auxiliar no seguinte código...</DIV>
<DIV>Tenho um modelo linear conforme expresso  no objeto"y". Neste código gostaria de obter uma integral "genérica" semelhante à derivada génerica obtida em D(y, "x1"). A idéia é integrar (dydx) em função de x1. x1 é o intervalo de no instante 1 e 2</DIV>
<DIV>Segue o código</DIV>
<DIV>###</DIV>
<DIV>y <- expression( a + b/x1 + c*log(x2) + d*((1/x1)*log(x2)) )<BR>D(y, "x1")<BR>dydx1 <- function(x, a=a, b=b, c=c, d=d) <BR>{<BR> -(d * (1/x1^2 * log(x2)) + b/x1^2)<BR>}<BR>integrate(dydx, lower = x1 <- 1, upper = x1 <- 2) # Aqui que está o interesse em generalizar a integral independente dos valores dos parametros (a, b, c, d). O que se deseja é uma expressão.<BR>### </DIV>
<DIV>Obrigado</DIV>
<DIV>Samuel</DIV>
<DIV><FONT size=3><STRONG>====================================</STRONG></FONT></DIV>
<DIV style="FONT-FAMILY: courier, monaco, monospace, sans-serif"><FONT size=3><STRONG>Samuel P. C. Carvalho<BR></STRONG><FONT color=#000000 size=2>Mestre em Ciências Florestais [UFLA]</FONT></FONT></DIV>
<DIV style="FONT-FAMILY: courier, monaco, monospace, sans-serif"><FONT color=#000000 size=2>Doutorando em Recursos Florestais [ESALQ/USP]</FONT></DIV>
<DIV style="FONT-FAMILY: courier, monaco, monospace, sans-serif"><FONT size=2>=============================================</FONT></DIV>
<DIV></DIV></div></body></html>