Re-running the code to update everything

kaybenleroll · Oct 24, 2023 · 297d692 · 297d692
1 parent 40730ab
commit 297d692
Show file tree

Hide file tree

Showing 8 changed files with 11,542 additions and 3,722 deletions.
diff --git a/construct_cdnow_fixed_pnbd_models.html b/construct_cdnow_fixed_pnbd_models.html
diff --git a/construct_cdnow_onehier_pnbd_models.html b/construct_cdnow_onehier_pnbd_models.html
diff --git a/construct_cdnow_twohier_pnbd_models.html b/construct_cdnow_twohier_pnbd_models.html
diff --git a/construct_onlineretail_fixed_pnbd_models.html b/construct_onlineretail_fixed_pnbd_models.html
diff --git a/construct_onlineretail_fixed_pnbd_models.qmd b/construct_onlineretail_fixed_pnbd_models.qmd
@@ -111,20 +111,13 @@ customer_subset_id |> glimpse()
 ```{r load_derived_data}
 #| echo: TRUE
 
-id_1000  <- read_rds("data/longsynth_id_1000.rds")
-id_5000  <- read_rds("data/longsynth_id_5000.rds")
-id_10000 <- read_rds("data/longsynth_id_10000.rds")
+customer_summarystats_tbl <- read_rds("data/onlineretail_customer_summarystats_tbl.rds")
 
-fit_1000_data_tbl  <- read_rds("data/longsynth_fit_1000_data_tbl.rds")
-fit_10000_data_tbl <- read_rds("data/longsynth_fit_10000_data_tbl.rds")
+obs_fitdata_tbl   <- read_rds("data/onlineretail_obs_fitdata_tbl.rds")
+obs_validdata_tbl <- read_rds("data/onlineretail_obs_validdata_tbl.rds")
 
-customer_fit_stats_tbl    <- fit_1000_data_tbl
-customer_summarystats_tbl <- read_rds("data/longsynth_customer_summarystats_tbl.rds")
-
-obs_fitdata_tbl   <- read_rds("data/longsynth_obs_fitdata_tbl.rds")
-obs_validdata_tbl <- read_rds("data/longsynth_obs_validdata_tbl.rds")
-
-customer_subset_id <- id_1000
+customer_fit_stats_tbl <- obs_fitdata_tbl |>
+  rename(x = tnx_count)
 ```
 
 

diff --git a/construct_onlineretail_onehier_pnbd_models.html b/construct_onlineretail_onehier_pnbd_models.html
diff --git a/construct_onlineretail_twohier_pnbd_models.html b/construct_onlineretail_twohier_pnbd_models.html
diff --git a/exploring_cdnow_dataset.html b/exploring_cdnow_dataset.html