Skip to content

Commit

Permalink
Make juv_trap_NB.stan reprex actually reproducible
Browse files Browse the repository at this point in the history
  • Loading branch information
@ebuhle
ebuhle committed Oct 31, 2019
1 parent f20061f commit e2d4df0
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions src/Stan_demo/juv_trap_Stan_script_Wenatchee.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -185,7 +185,7 @@ print(juv_trap_fit, pars = c("phi_M","sigma_M","beta_p","sigma_p","M_tot"),


#Negative Binomial (1) observation model

set.seed(1234)
juv_trap_fit_2 <- stan(file = here::here("src","Stan_demo","juv_trap_NB.stan"),
data = stan_dat,
init = stan_init(stan_dat,3),
Expand All @@ -194,8 +194,8 @@ juv_trap_fit_2 <- stan(file = here::here("src","Stan_demo","juv_trap_NB.stan"),
"M_hat","M","M_tot","C_hat",
"p_NB","beta_NB","LL_MR","LL_trap"),
chains = 3, iter = 4000, warmup = 500, thin = 1, cores = 3,
control = list(adapt_delta = 0.99, max_treedepth = 13),
seed = 200435199)
control = list(adapt_delta = 0.99, max_treedepth = 13),
seed = 2004351991)



Expand Down

1 comment on commit e2d4df0

@ebuhle
Copy link
Collaborator Author

@ebuhle ebuhle commented on e2d4df0 Oct 31, 2019

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

See #3 (comment)

Please sign in to comment.