Merge pull request #8 from kaybenleroll/create-simple-hier-models

create simple hier models
kaybenleroll · Nov 7, 2023 · cc322c3 · cc322c3
2 parents 7f6233c + 0e9f12a
commit cc322c3
Show file tree

Hide file tree

Showing 27 changed files with 3,226 additions and 2,757 deletions.
diff --git a/.github/workflows/build_docker_image.yml b/.github/workflows/build_docker_image.yml
@@ -27,4 +27,4 @@ jobs:
         uses: docker/build-push-action@v5
         with:
           push: true
-          tags: kaybenleroll/btydbayes_investigation:latest
+          tags: kaybenleroll/btydbayes-investigation:latest
diff --git a/Dockerfile b/Dockerfile
@@ -1,7 +1,7 @@
 FROM rocker/tidyverse:4.3.1
 
-COPY build/Rprofile.site /usr/local/lib/R/etc/
-COPY build/Renviron.site /usr/local/lib/R/etc/
+#COPY build/Rprofile.site /usr/local/lib/R/etc/
+#COPY build/Renviron.site /usr/local/lib/R/etc/
 
 ENV TZ=Europe/Dublin
 

diff --git a/construct_cdnow_fixed_pnbd_models.html b/construct_cdnow_fixed_pnbd_models.html
diff --git a/construct_cdnow_fixed_pnbd_models.qmd b/construct_cdnow_fixed_pnbd_models.qmd
@@ -306,7 +306,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_cdnow_fixed1_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-#  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -490,7 +489,6 @@ We want to check the $N_{eff}$ statistics also.
 
 pnbd_cdnow_fixed2_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -674,7 +672,6 @@ We want to check the $N_{eff}$ statistics also.
 
 pnbd_cdnow_fixed3_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -858,7 +855,6 @@ We want to check the $N_{eff}$ statistics also.
 
 pnbd_cdnow_fixed4_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```

diff --git a/construct_cdnow_onehier_pnbd_models.html b/construct_cdnow_onehier_pnbd_models.html
diff --git a/construct_cdnow_onehier_pnbd_models.qmd b/construct_cdnow_onehier_pnbd_models.qmd
@@ -303,7 +303,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_cdnow_onehierlambda1_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -491,7 +490,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_cdnow_onehierlambda2_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -691,7 +689,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_cdnow_onehiermu1_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -875,7 +872,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_cdnow_onehiermu2_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```

diff --git a/construct_cdnow_twohier_pnbd_models.html b/construct_cdnow_twohier_pnbd_models.html
diff --git a/construct_longsynth_fixed_pnbd_models.html b/construct_longsynth_fixed_pnbd_models.html
diff --git a/construct_longsynth_fixed_pnbd_models.qmd b/construct_longsynth_fixed_pnbd_models.qmd
@@ -281,7 +281,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_long_fixed1_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -459,7 +458,6 @@ We want to check the $N_{eff}$ statistics also.
 
 pnbd_long_fixed2_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -634,7 +632,6 @@ We want to check the $N_{eff}$ statistics also.
 
 pnbd_long_fixed3_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```

diff --git a/construct_longsynth_onehier_pnbd_models.html b/construct_longsynth_onehier_pnbd_models.html
diff --git a/construct_longsynth_onehier_pnbd_models.qmd b/construct_longsynth_onehier_pnbd_models.qmd
@@ -292,7 +292,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_long_onehierlambda1_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -483,7 +482,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_long_onehierlambda2_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -686,7 +684,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_long_onehiermu1_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```
@@ -873,7 +870,6 @@ We also check $N_{eff}$ as a quick diagnostic of the fit.
 
 pnbd_long_onehiermu2_stanfit |>
   neff_ratio(pars = c("lambda", "mu")) |>
-  as.numeric() |>
   mcmc_neff() +
     ggtitle("Plot of Parameter Effective Sample Sizes")
 ```