[adsense:responsibe:9545213979]
> f<- function(x) 3*x^2/2; > #integramos entre los valores -2 y 0 para los valores en que la funcion densidad es distinta de cero > integrate(f,lower=-1,upper=0) 0.5 with absolute error < 5.6e-15
> library(distr) > f<- function(x) 3*x^2/2; > X <- AbscontDistribution(d = f, low1 = -1, up1 = 1) > p(X)(0) - p(X)(-2) [1] 0.5
Comentarios recientes