diff options
Diffstat (limited to 'inst/stan/include/functions_occu.stan')
-rw-r--r-- | inst/stan/include/functions_occu.stan | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/inst/stan/include/functions_occu.stan b/inst/stan/include/functions_occu.stan index 99ddde3..0b6d153 100644 --- a/inst/stan/include/functions_occu.stan +++ b/inst/stan/include/functions_occu.stan @@ -1,4 +1,4 @@ -real lp_occu(int[] y, real logit_psi, vector logit_p, int Kmin){ +real lp_occu(array[] int y, real logit_psi, vector logit_p, int Kmin){ real out; out = log_inv_logit(logit_psi) + bernoulli_logit_lpmf(y | logit_p); if(Kmin == 1){ @@ -7,8 +7,8 @@ real lp_occu(int[] y, real logit_psi, vector logit_p, int Kmin){ return log_sum_exp(out, log1m_inv_logit(logit_psi)); } -vector get_loglik_occu(int[] y, int M, int[,] J, int[,] si, vector logit_psi, - vector logit_p, int[] Kmin){ +vector get_loglik_occu(array[] int y, int M, array[,] int J, array[,] int si, vector logit_psi, + vector logit_p, array[] int Kmin){ vector[M] out; for (i in 1:M){ out[i] = lp_occu(y[si[i,1]:si[i,2]], logit_psi[i], |