Apenas corrigindo (em negrito o que acrescentei) a função do Davi: area <-function(lims,prec){ x<-seq(lims[1],lims[2],prec)**** resp <- sum(x^2) / length(x)* *(lims[2] - lims[1])*** return(resp)**** } 2013/5/22 Davi Butturi-Gomes <davi.butturi@gmail.com>
Ah, vc pode fazer o seguinte no R:
#escolher os limites da integral limsteste <- c(0,1)
****
#escolher a “precisão” numérica precteste <- 0.0001
#escolher a função, por exemplo, x^2. area <-function(lims,prec){ x<-seq(lims[1],lims[2],prec)****
resp <- sum(x^2) / length(x)****
return(resp)****
}
****
area(limsteste,precteste)****
** **
*____________________*
*MSc. Davi Butturi-Gomes *ESALQ-USP****
davibg@usp.br**
** **
*De:* R-br [mailto:r-br-bounces@listas.c3sl.ufpr.br] *Em nome de *Pedro Emmanuel Alvarenga Americano do Brasil *Enviada em:* quarta-feira, 22 de maio de 2013 21:34 *Para:* R BR lista *Assunto:* [R-br] Area sob uma curva****
** **
Amigos de R,****
Ha muito tempo atras, acho que ainda na R-stat, alguem postou que havia uma funçao que estima a area sob uma curva. Procurei e procurei e nao achei. Alguem sabe me dizer se existe mesmo uma funçao com esse proposito? Preferencialmente em um pacote do core. ****
Abraço a todos,****
Pedro Brasil via Android (:)=****
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.