From 9e40637cad24ea24a19e8def8deb4fa235f3118b Mon Sep 17 00:00:00 2001 From: Kyle Belanger Date: Mon, 27 Feb 2023 14:19:22 -0500 Subject: [PATCH] Update chapter3.qmd --- chapter3.qmd | 52 ++++++++++++++++++++++++++++++++++++++++++++++------ 1 file changed, 46 insertions(+), 6 deletions(-) diff --git a/chapter3.qmd b/chapter3.qmd index 24f7585..ec01092 100644 --- a/chapter3.qmd +++ b/chapter3.qmd @@ -62,14 +62,54 @@ When examining @fig-distro_histo, many clinical chemistry values do not show a s ## Data Tools -All data handling and modeling were performed using R and R Studio. The current report was rendered in the following environment for documentation and reproducibility. +All data handling and modeling were performed using R and R Studio. The current report was rendered in the following environment. ```{r} -if( requireNamespace("devtools", quietly = TRUE) ) { - devtools::session_info() -} else { - sessionInfo() -} +#| label: tbl-platform-info +#| tbl-cap: Session Info R Environment +#| echo: false +#| #| message: false + +df_session_platform <- devtools::session_info()$platform %>% + unlist(.) %>% + as.data.frame(.) %>% + tibble::rownames_to_column(.) + +colnames(df_session_platform) <- c("Setting", "Value") + +knitr::kable( + df_session_platform + ,align = 'l' + ,booktabs = TRUE +) + +``` + +```{r} +#| label: tbl-package-info +#| tbl-cap: Package Info R Environment +#| echo: false +#| message: false + + +df_session_packages <- devtools::session_info(include_base = TRUE)$packages %>% + as.data.frame(.) %>% + dplyr::select(loadedversion, date) %>% + tibble::rownames_to_column() + +colnames(df_session_packages) <- c("Package", "Loaded Version", "Date") + +used_packages <-renv::dependencies() %>% dplyr::select(2) + +df_session_packages <- df_session_packages %>% + dplyr::filter(Package %in% used_packages$Package) + +knitr::kable( + df_session_packages + ,align = 'l' + ,booktabs = TRUE +) + ``` ## Model Selection