function(par,x){
beta = par[1]
c = par[2]
a = par[3]
a * beta * c * exp(-(beta*x)^c) * (beta*x)^(c-1) * (1 - exp(-(beta*x)^c))^(a-1)
}
integrate(f=fdp_expweibull,par=c(1,1,1),0,Inf)$value == 1
Porque o resultado é false?
[ ],
Pedro Rafael Diniz Marinho.