AUC_Updates

Author: JesperFischer

docs/source/examples/R/Example scripts/Example_analysis_bayesian.Rmd

@@ -38,7 +38,7 @@ model = cmdstan_model(here("docs","source","examples","R","src","first_model.sta
 results = single_sub_analysis(df, 
                               interoPost = NA, 
                               exteroPost = NA, 
-                              bayesian = F, 
+                              bayesian = T, 
                               model = model, 
                               out = here::here("docs","source","examples","R"))
 ```

docs/source/examples/R/Example scripts/Example_analysis_simple.Rmd

@@ -1,7 +1,7 @@
 ---
 title: "Example Analysis"
 author: "Jesper Fischer Ehmsen"
-date: '2023-01-05'
+date: "`r Sys.Date()`"
 output:
   html_document: default
 ---

docs/source/examples/R/src/firstlevelanalysis.R

@@ -303,7 +303,7 @@ study_analysis <- function(path, bayesian, model, folder = T, out) {
 
 
       data$id = gsub("^\\D*(\\d+).*", "\\1", sub_files[i])
-
+      
 
       file <- basename(sub_files[i])
       data$file = file