Qndo chamo a função,mesmo sem pasar o valor de "n", ela executa
normalmente. Porque? E debugando observo que "n" é um vetor de 15
posições. Como "n" adquire esse valor?
dsad <- Vectorize(FUN=
function(y,a,lambda){
poi <- function(y,n){
w <- y*log(a*n)-lfactorial(y)-a*n
exp(w)
}
f1 <- function(n){
dexp(n,rate=lambda) * poi(y,n)
}
integrate(f1,0,Inf)$value
},
"y")
dsad(1,0.1,0.1)
_______________________________________________
R-br mailing list
[email protected]
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.
