11 Mai
2012
11 Mai
'12
15:46
Olá Sérgio, Altere o inits para inits <- function(){list(p=rbeta(N,1.001,1.001),r=rgamma(N,0.01,0.01))} Abraço Márcio Nicolau Send from mobile Em 11/05/2012, às 11:55, Sérgio Henrique almeida da silva ju<sergio.edfisica@gmail.com> escreveu:
inits <- function(){list(p=rbeta(N,1.001,1.001),r=rgamma(1,0.01,0.01))}