diff --git a/.ROS-Examples-root b/.ROS-Examples-root new file mode 100644 index 00000000..e69de29b diff --git a/AgePeriodCohort/births.R b/AgePeriodCohort/births.R index 1707ca52..62d42f25 100644 --- a/AgePeriodCohort/births.R +++ b/AgePeriodCohort/births.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Load data births <- read.table(root("AgePeriodCohort/data","births.txt"), header=TRUE) diff --git a/AgePeriodCohort/births.Rmd b/AgePeriodCohort/births.Rmd index 900bdcdf..e04b7ec6 100644 --- a/AgePeriodCohort/births.Rmd +++ b/AgePeriodCohort/births.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Load data diff --git a/AgePeriodCohort/births_letter.R b/AgePeriodCohort/births_letter.R index 273d776f..31a4b4a1 100644 --- a/AgePeriodCohort/births_letter.R +++ b/AgePeriodCohort/births_letter.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' **Load packages** library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' **Initialize running the first part** #+ results='hide' diff --git a/AgePeriodCohort/births_letter.Rmd b/AgePeriodCohort/births_letter.Rmd index ce890642..141b8146 100644 --- a/AgePeriodCohort/births_letter.Rmd +++ b/AgePeriodCohort/births_letter.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` **Initialize running the first part** diff --git a/Arsenic/arsenic_logistic_apc.R b/Arsenic/arsenic_logistic_apc.R index 28cb8316..29e6d521 100644 --- a/Arsenic/arsenic_logistic_apc.R +++ b/Arsenic/arsenic_logistic_apc.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") invlogit <- plogis diff --git a/Arsenic/arsenic_logistic_apc.Rmd b/Arsenic/arsenic_logistic_apc.Rmd index 32705270..fbeb6622 100644 --- a/Arsenic/arsenic_logistic_apc.Rmd +++ b/Arsenic/arsenic_logistic_apc.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") invlogit <- plogis diff --git a/Arsenic/arsenic_logistic_building.R b/Arsenic/arsenic_logistic_building.R index 72629995..7b3f1fc9 100644 --- a/Arsenic/arsenic_logistic_building.R +++ b/Arsenic/arsenic_logistic_building.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") invlogit <- plogis diff --git a/Arsenic/arsenic_logistic_building.Rmd b/Arsenic/arsenic_logistic_building.Rmd index 52e8bcd0..f4f5eb73 100644 --- a/Arsenic/arsenic_logistic_building.Rmd +++ b/Arsenic/arsenic_logistic_building.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") invlogit <- plogis diff --git a/Arsenic/arsenic_logistic_building_optimizing.R b/Arsenic/arsenic_logistic_building_optimizing.R index 808696ac..6203bb58 100644 --- a/Arsenic/arsenic_logistic_building_optimizing.R +++ b/Arsenic/arsenic_logistic_building_optimizing.R @@ -30,7 +30,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") invlogit <- plogis diff --git a/Arsenic/arsenic_logistic_building_optimizing.Rmd b/Arsenic/arsenic_logistic_building_optimizing.Rmd index 4f43382d..67c6266a 100644 --- a/Arsenic/arsenic_logistic_building_optimizing.Rmd +++ b/Arsenic/arsenic_logistic_building_optimizing.Rmd @@ -32,7 +32,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") invlogit <- plogis diff --git a/Arsenic/arsenic_logistic_residuals.R b/Arsenic/arsenic_logistic_residuals.R index 4b631679..a13d1226 100644 --- a/Arsenic/arsenic_logistic_residuals.R +++ b/Arsenic/arsenic_logistic_residuals.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") invlogit <- plogis diff --git a/Arsenic/arsenic_logistic_residuals.Rmd b/Arsenic/arsenic_logistic_residuals.Rmd index 9e8e5c81..029194b0 100644 --- a/Arsenic/arsenic_logistic_residuals.Rmd +++ b/Arsenic/arsenic_logistic_residuals.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") invlogit <- plogis diff --git a/Balance/treatcontrol.R b/Balance/treatcontrol.R index f42f5d4d..a37bf497 100644 --- a/Balance/treatcontrol.R +++ b/Balance/treatcontrol.R @@ -25,7 +25,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Plot figures bell <- function(filename, mu, sd, lo, hi, ymax){ diff --git a/Balance/treatcontrol.Rmd b/Balance/treatcontrol.Rmd index b61c1015..b6413d24 100644 --- a/Balance/treatcontrol.Rmd +++ b/Balance/treatcontrol.Rmd @@ -27,7 +27,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Plot figures diff --git a/Beauty/beauty.R b/Beauty/beauty.R index 04a243d7..6b06b513 100644 --- a/Beauty/beauty.R +++ b/Beauty/beauty.R @@ -28,7 +28,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/Beauty/beauty.Rmd b/Beauty/beauty.Rmd index b418a166..78e832ba 100644 --- a/Beauty/beauty.Rmd +++ b/Beauty/beauty.Rmd @@ -30,7 +30,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/CausalDiagram/diagrams.R b/CausalDiagram/diagrams.R index 2056081b..81e8face 100644 --- a/CausalDiagram/diagrams.R +++ b/CausalDiagram/diagrams.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Plot causal diagram #+ eval=FALSE, include=FALSE diff --git a/CausalDiagram/diagrams.Rmd b/CausalDiagram/diagrams.Rmd index e893df59..21f94049 100644 --- a/CausalDiagram/diagrams.Rmd +++ b/CausalDiagram/diagrams.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Plot causal diagram diff --git a/CentralLimitTheorem/heightweight.R b/CentralLimitTheorem/heightweight.R index eaec6169..4994fa03 100644 --- a/CentralLimitTheorem/heightweight.R +++ b/CentralLimitTheorem/heightweight.R @@ -25,7 +25,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Summary data of height and weight distributions of women and men height_counts_women <- c(80,107,296,695,1612,2680,4645,8201,9948,11733,10270,9942,6181,3990,2131,1154,245,257,0,0,0,0)*10339/74167 diff --git a/CentralLimitTheorem/heightweight.Rmd b/CentralLimitTheorem/heightweight.Rmd index abfc1bda..f61242dc 100644 --- a/CentralLimitTheorem/heightweight.Rmd +++ b/CentralLimitTheorem/heightweight.Rmd @@ -27,7 +27,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Summary data of height and weight distributions of women and men diff --git a/Childcare/childcare.R b/Childcare/childcare.R index 43503c87..4dd96185 100644 --- a/Childcare/childcare.R +++ b/Childcare/childcare.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") library("arm") library("rstanarm") diff --git a/Childcare/childcare.Rmd b/Childcare/childcare.Rmd index bd98bcc1..fda56929 100644 --- a/Childcare/childcare.Rmd +++ b/Childcare/childcare.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") library("arm") library("rstanarm") diff --git a/Congress/congress.R b/Congress/congress.R index 6c1e1200..51c63b2c 100644 --- a/Congress/congress.R +++ b/Congress/congress.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' #### Load data diff --git a/Congress/congress.Rmd b/Congress/congress.Rmd index a4eec41f..0ea36d36 100644 --- a/Congress/congress.Rmd +++ b/Congress/congress.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ``` diff --git a/Coop/riverbay.R b/Coop/riverbay.R index 85f4e995..84d5ed0a 100644 --- a/Coop/riverbay.R +++ b/Coop/riverbay.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Load data data <- read.table(root("Coop/data","Riverbay.csv"), header=FALSE, sep=",") diff --git a/Coop/riverbay.Rmd b/Coop/riverbay.Rmd index 1cac5eb6..01a511b9 100644 --- a/Coop/riverbay.Rmd +++ b/Coop/riverbay.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Load data diff --git a/Coverage/coverage.R b/Coverage/coverage.R index ca03b7f7..16c4cf5e 100644 --- a/Coverage/coverage.R +++ b/Coverage/coverage.R @@ -24,7 +24,7 @@ savefigs <- FALSE #+ eval=FALSE, include=FALSE library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Simulate n_rep <- 100 diff --git a/Coverage/coverage.Rmd b/Coverage/coverage.Rmd index 6cd476fa..3c428e28 100644 --- a/Coverage/coverage.Rmd +++ b/Coverage/coverage.Rmd @@ -24,7 +24,7 @@ savefigs <- FALSE ``` ```{r eval=FALSE, include=FALSE} library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Simulate diff --git a/CrossValidation/crossvalidation.R b/CrossValidation/crossvalidation.R index 004bc869..24ce26ed 100644 --- a/CrossValidation/crossvalidation.R +++ b/CrossValidation/crossvalidation.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") library("ggplot2") diff --git a/CrossValidation/crossvalidation.Rmd b/CrossValidation/crossvalidation.Rmd index 15f3d14c..2e98c423 100644 --- a/CrossValidation/crossvalidation.Rmd +++ b/CrossValidation/crossvalidation.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") library("ggplot2") diff --git a/Death/polls.R b/Death/polls.R index 423de672..5bd66e40 100644 --- a/Death/polls.R +++ b/Death/polls.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("ggplot2") theme_set(bayesplot::theme_default(base_family = "sans")) diff --git a/Death/polls.Rmd b/Death/polls.Rmd index b3e5e77c..eae17d28 100644 --- a/Death/polls.Rmd +++ b/Death/polls.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("ggplot2") theme_set(bayesplot::theme_default(base_family = "sans")) ``` diff --git a/Earnings/earnings_bootstrap.R b/Earnings/earnings_bootstrap.R index 9840fa7d..d06faa23 100644 --- a/Earnings/earnings_bootstrap.R +++ b/Earnings/earnings_bootstrap.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Load data earnings <- read.csv(root("Earnings/data","earnings.csv")) diff --git a/Earnings/earnings_bootstrap.Rmd b/Earnings/earnings_bootstrap.Rmd index 870ff6e4..9ab086ce 100644 --- a/Earnings/earnings_bootstrap.Rmd +++ b/Earnings/earnings_bootstrap.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Load data diff --git a/Earnings/earnings_compound.R b/Earnings/earnings_compound.R index dcf47003..27f25b57 100644 --- a/Earnings/earnings_compound.R +++ b/Earnings/earnings_compound.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/Earnings/earnings_compound.Rmd b/Earnings/earnings_compound.Rmd index 80314a75..30cdf42f 100644 --- a/Earnings/earnings_compound.Rmd +++ b/Earnings/earnings_compound.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/Earnings/earnings_regression.R b/Earnings/earnings_regression.R index fc4ec62e..6669128b 100644 --- a/Earnings/earnings_regression.R +++ b/Earnings/earnings_regression.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/Earnings/earnings_regression.Rmd b/Earnings/earnings_regression.Rmd index c28d48c0..30619518 100644 --- a/Earnings/earnings_regression.Rmd +++ b/Earnings/earnings_regression.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/Earnings/height_and_weight.R b/Earnings/height_and_weight.R index d2f04d40..fc6be860 100644 --- a/Earnings/height_and_weight.R +++ b/Earnings/height_and_weight.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' #### Load data diff --git a/Earnings/height_and_weight.Rmd b/Earnings/height_and_weight.Rmd index a0309eb3..21b2a01d 100644 --- a/Earnings/height_and_weight.Rmd +++ b/Earnings/height_and_weight.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ``` diff --git a/ElectionsEconomy/bayes.R b/ElectionsEconomy/bayes.R index 7b4dcc2e..ae4f7b22 100644 --- a/ElectionsEconomy/bayes.R +++ b/ElectionsEconomy/bayes.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' ## Calculations #' diff --git a/ElectionsEconomy/bayes.Rmd b/ElectionsEconomy/bayes.Rmd index 71959993..e81dd1be 100644 --- a/ElectionsEconomy/bayes.Rmd +++ b/ElectionsEconomy/bayes.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` ## Calculations diff --git a/ElectionsEconomy/hibbs.R b/ElectionsEconomy/hibbs.R index 6ffd1d9e..ff1d3412 100644 --- a/ElectionsEconomy/hibbs.R +++ b/ElectionsEconomy/hibbs.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("arm") library("ggplot2") diff --git a/ElectionsEconomy/hibbs.Rmd b/ElectionsEconomy/hibbs.Rmd index 4f144169..71498b55 100644 --- a/ElectionsEconomy/hibbs.Rmd +++ b/ElectionsEconomy/hibbs.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("arm") library("ggplot2") diff --git a/ElectionsEconomy/hibbs_coverage.R b/ElectionsEconomy/hibbs_coverage.R index 25935de0..b84291c2 100644 --- a/ElectionsEconomy/hibbs_coverage.R +++ b/ElectionsEconomy/hibbs_coverage.R @@ -23,7 +23,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' #### Load data diff --git a/ElectionsEconomy/hibbs_coverage.Rmd b/ElectionsEconomy/hibbs_coverage.Rmd index c5a19aa2..6937d901 100644 --- a/ElectionsEconomy/hibbs_coverage.Rmd +++ b/ElectionsEconomy/hibbs_coverage.Rmd @@ -25,7 +25,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ``` diff --git a/ElectionsEconomy/hills.R b/ElectionsEconomy/hills.R index 2f574a10..cb8a4730 100644 --- a/ElectionsEconomy/hills.R +++ b/ElectionsEconomy/hills.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") library("rstanarm") diff --git a/ElectionsEconomy/hills.Rmd b/ElectionsEconomy/hills.Rmd index a72ec31e..9bedf7fc 100644 --- a/ElectionsEconomy/hills.Rmd +++ b/ElectionsEconomy/hills.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") library("rstanarm") ``` diff --git a/ElectricCompany/electric.R b/ElectricCompany/electric.R index 47b52504..ce6a920e 100644 --- a/ElectricCompany/electric.R +++ b/ElectricCompany/electric.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") invlogit <- plogis diff --git a/ElectricCompany/electric.Rmd b/ElectricCompany/electric.Rmd index 95645b98..f9c6d294 100644 --- a/ElectricCompany/electric.Rmd +++ b/ElectricCompany/electric.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") invlogit <- plogis ``` diff --git a/FrenchElection/ps_primaire.R b/FrenchElection/ps_primaire.R index e0e915f5..64e91a74 100644 --- a/FrenchElection/ps_primaire.R +++ b/FrenchElection/ps_primaire.R @@ -21,7 +21,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Load data ps <- read.table(root("FrenchElection/data","ps_primaire.txt"), header=TRUE) diff --git a/FrenchElection/ps_primaire.Rmd b/FrenchElection/ps_primaire.Rmd index 53e4137d..d2c058ed 100644 --- a/FrenchElection/ps_primaire.Rmd +++ b/FrenchElection/ps_primaire.Rmd @@ -23,7 +23,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Load data diff --git a/Gay/gay.R b/Gay/gay.R index 7904aaa3..55e94a5e 100644 --- a/Gay/gay.R +++ b/Gay/gay.R @@ -25,7 +25,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") # Enable parallel computation in stan_gamm4 used for splines and GPs options(mc.cores = parallel::detectCores()) diff --git a/Gay/gay.Rmd b/Gay/gay.Rmd index 64a2c230..e1486827 100644 --- a/Gay/gay.Rmd +++ b/Gay/gay.Rmd @@ -27,7 +27,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") # Enable parallel computation in stan_gamm4 used for splines and GPs options(mc.cores = parallel::detectCores()) diff --git a/Gay/gay_simple.R b/Gay/gay_simple.R index 63352421..f1d25df3 100644 --- a/Gay/gay_simple.R +++ b/Gay/gay_simple.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' #### Load data diff --git a/Gay/gay_simple.Rmd b/Gay/gay_simple.Rmd index 011c6bab..527e1a80 100644 --- a/Gay/gay_simple.Rmd +++ b/Gay/gay_simple.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ``` diff --git a/Golf/golf.R b/Golf/golf.R index 28846127..05b6c61a 100644 --- a/Golf/golf.R +++ b/Golf/golf.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") rstan_options(auto_write = TRUE) library("rstanarm") diff --git a/Golf/golf.Rmd b/Golf/golf.Rmd index 9abd1ba4..c54029be 100644 --- a/Golf/golf.Rmd +++ b/Golf/golf.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") rstan_options(auto_write = TRUE) library("rstanarm") diff --git a/HDI/hdi.R b/HDI/hdi.R index 485e3d2d..4bb987c6 100644 --- a/HDI/hdi.R +++ b/HDI/hdi.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("foreign") library("maps") diff --git a/HDI/hdi.Rmd b/HDI/hdi.Rmd index f4597881..3fc49f27 100644 --- a/HDI/hdi.Rmd +++ b/HDI/hdi.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("foreign") library("maps") ``` diff --git a/HealthExpenditure/healthexpenditure.R b/HealthExpenditure/healthexpenditure.R index ea9919bd..6f3894ec 100644 --- a/HealthExpenditure/healthexpenditure.R +++ b/HealthExpenditure/healthexpenditure.R @@ -27,7 +27,7 @@ library("ggplot2") library("bayesplot") theme_set(bayesplot::theme_default(base_family = "sans")) library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Load data health <- read.table(root("HealthExpenditure/data","healthdata.txt"), header=TRUE) diff --git a/HealthExpenditure/healthexpenditure.Rmd b/HealthExpenditure/healthexpenditure.Rmd index bf7e1524..3641c03f 100644 --- a/HealthExpenditure/healthexpenditure.Rmd +++ b/HealthExpenditure/healthexpenditure.Rmd @@ -29,7 +29,7 @@ library("ggplot2") library("bayesplot") theme_set(bayesplot::theme_default(base_family = "sans")) library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Load data diff --git a/Helicopters/helicopters.R b/Helicopters/helicopters.R index 6af59660..6bebe6e9 100644 --- a/Helicopters/helicopters.R +++ b/Helicopters/helicopters.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Load data helicopters <- read.table(root("Helicopters/data","helicopters.txt"), header=TRUE) diff --git a/Helicopters/helicopters.Rmd b/Helicopters/helicopters.Rmd index 400a0c18..48f61ccc 100644 --- a/Helicopters/helicopters.Rmd +++ b/Helicopters/helicopters.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Load data diff --git a/Imputation/imputation.R b/Imputation/imputation.R index 8364a70a..99019ddc 100644 --- a/Imputation/imputation.R +++ b/Imputation/imputation.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' #### Load data diff --git a/Imputation/imputation.Rmd b/Imputation/imputation.Rmd index 83e1888a..47264464 100644 --- a/Imputation/imputation.Rmd +++ b/Imputation/imputation.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ``` diff --git a/Imputation/imputation_gg.R b/Imputation/imputation_gg.R index 1a93aaa4..48b6ebc0 100644 --- a/Imputation/imputation_gg.R +++ b/Imputation/imputation_gg.R @@ -25,7 +25,7 @@ savefigs <- FALSE #' **Load packages** library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("dplyr") library("ggplot2") diff --git a/Imputation/imputation_gg.Rmd b/Imputation/imputation_gg.Rmd index 92f39a08..b8d48f4c 100644 --- a/Imputation/imputation_gg.Rmd +++ b/Imputation/imputation_gg.Rmd @@ -27,7 +27,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("dplyr") library("ggplot2") diff --git a/Influence/influence.R b/Influence/influence.R index 20a8f8a1..f8a7d24b 100644 --- a/Influence/influence.R +++ b/Influence/influence.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Fake data x <- seq(2, 12, 1) diff --git a/Influence/influence.Rmd b/Influence/influence.Rmd index e3c62b95..3f3aeeb9 100644 --- a/Influence/influence.Rmd +++ b/Influence/influence.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Fake data diff --git a/Interactions/interactions.R b/Interactions/interactions.R index ba045d2b..2b890ea8 100644 --- a/Interactions/interactions.R +++ b/Interactions/interactions.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Plot interaction example figure #+ eval=FALSE, include=FALSE diff --git a/Interactions/interactions.Rmd b/Interactions/interactions.Rmd index 1bd13f24..5f489891 100644 --- a/Interactions/interactions.Rmd +++ b/Interactions/interactions.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Plot interaction example figure diff --git a/Introclass/residual_plots.R b/Introclass/residual_plots.R index e5379f6f..03bb07eb 100644 --- a/Introclass/residual_plots.R +++ b/Introclass/residual_plots.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' #### Load data diff --git a/Introclass/residual_plots.Rmd b/Introclass/residual_plots.Rmd index aac5ca9b..6844552d 100644 --- a/Introclass/residual_plots.Rmd +++ b/Introclass/residual_plots.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ``` diff --git a/KidIQ/kidiq.R b/KidIQ/kidiq.R index a44439f1..fac35ecc 100644 --- a/KidIQ/kidiq.R +++ b/KidIQ/kidiq.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/KidIQ/kidiq.Rmd b/KidIQ/kidiq.Rmd index 7f57d5fe..acf582ca 100644 --- a/KidIQ/kidiq.Rmd +++ b/KidIQ/kidiq.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/KidIQ/kidiq_R2.R b/KidIQ/kidiq_R2.R index 988237d9..6dc336db 100644 --- a/KidIQ/kidiq_R2.R +++ b/KidIQ/kidiq_R2.R @@ -26,7 +26,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") library("foreign") diff --git a/KidIQ/kidiq_R2.Rmd b/KidIQ/kidiq_R2.Rmd index ef9f9f66..37b8e6e7 100644 --- a/KidIQ/kidiq_R2.Rmd +++ b/KidIQ/kidiq_R2.Rmd @@ -28,7 +28,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") library("foreign") diff --git a/KidIQ/kidiq_kcv.R b/KidIQ/kidiq_kcv.R index 8ac1a934..35998bfe 100644 --- a/KidIQ/kidiq_kcv.R +++ b/KidIQ/kidiq_kcv.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("foreign") # for reproducability diff --git a/KidIQ/kidiq_kcv.Rmd b/KidIQ/kidiq_kcv.Rmd index a5b9daa3..3f72fc67 100644 --- a/KidIQ/kidiq_kcv.Rmd +++ b/KidIQ/kidiq_kcv.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("foreign") # for reproducability diff --git a/KidIQ/kidiq_loo.R b/KidIQ/kidiq_loo.R index 42a03f25..2cfc75b4 100644 --- a/KidIQ/kidiq_loo.R +++ b/KidIQ/kidiq_loo.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") library("foreign") diff --git a/KidIQ/kidiq_loo.Rmd b/KidIQ/kidiq_loo.Rmd index 629c899a..8898a474 100644 --- a/KidIQ/kidiq_loo.Rmd +++ b/KidIQ/kidiq_loo.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("loo") library("foreign") diff --git a/LogitGraphs/logitgraphs.R b/LogitGraphs/logitgraphs.R index 12c661e3..c8841d9a 100644 --- a/LogitGraphs/logitgraphs.R +++ b/LogitGraphs/logitgraphs.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") options(mc.cores = parallel::detectCores()) logit <- qlogis diff --git a/LogitGraphs/logitgraphs.Rmd b/LogitGraphs/logitgraphs.Rmd index 75392a09..b3676085 100644 --- a/LogitGraphs/logitgraphs.Rmd +++ b/LogitGraphs/logitgraphs.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") options(mc.cores = parallel::detectCores()) logit <- qlogis diff --git a/Mesquite/mesquite.R b/Mesquite/mesquite.R index 73139e92..278c35d9 100644 --- a/Mesquite/mesquite.R +++ b/Mesquite/mesquite.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("foreign") library("rstanarm") library("loo") diff --git a/Mesquite/mesquite.Rmd b/Mesquite/mesquite.Rmd index d48083d2..0aad2d17 100644 --- a/Mesquite/mesquite.Rmd +++ b/Mesquite/mesquite.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("foreign") library("rstanarm") library("loo") diff --git a/Metabolic/metabolic.R b/Metabolic/metabolic.R index 28bcd008..4b9884b8 100644 --- a/Metabolic/metabolic.R +++ b/Metabolic/metabolic.R @@ -28,7 +28,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #+ eval=FALSE, include=FALSE diff --git a/Metabolic/metabolic.Rmd b/Metabolic/metabolic.Rmd index edf56a9d..cdbf613f 100644 --- a/Metabolic/metabolic.Rmd +++ b/Metabolic/metabolic.Rmd @@ -30,7 +30,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` diff --git a/Mile/mile.R b/Mile/mile.R index c712bb06..969f9c61 100644 --- a/Mile/mile.R +++ b/Mile/mile.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") theme_set(bayesplot::theme_default(base_family = "sans")) diff --git a/Mile/mile.Rmd b/Mile/mile.Rmd index d0db9537..81e2c637 100644 --- a/Mile/mile.Rmd +++ b/Mile/mile.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") theme_set(bayesplot::theme_default(base_family = "sans")) diff --git a/NES/nes_linear.R b/NES/nes_linear.R index 8401cfb3..050598fc 100644 --- a/NES/nes_linear.R +++ b/NES/nes_linear.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("foreign") diff --git a/NES/nes_linear.Rmd b/NES/nes_linear.Rmd index d154d36c..daa23fb1 100644 --- a/NES/nes_linear.Rmd +++ b/NES/nes_linear.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("foreign") ``` diff --git a/NES/nes_logistic.R b/NES/nes_logistic.R index 5db91877..e0bd0064 100644 --- a/NES/nes_logistic.R +++ b/NES/nes_logistic.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") library("rstanarm") library("foreign") diff --git a/NES/nes_logistic.Rmd b/NES/nes_logistic.Rmd index 09871aae..917cef31 100644 --- a/NES/nes_logistic.Rmd +++ b/NES/nes_logistic.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") library("rstanarm") library("foreign") diff --git a/Names/lastletters.R b/Names/lastletters.R index 716461d5..de0c3f99 100644 --- a/Names/lastletters.R +++ b/Names/lastletters.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Load data allnames <- read.csv(root("Names/data","SSA-longtail-names.csv")) diff --git a/Names/lastletters.Rmd b/Names/lastletters.Rmd index a2d4d66b..e6ae7989 100644 --- a/Names/lastletters.Rmd +++ b/Names/lastletters.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Load data diff --git a/Names/names.R b/Names/names.R index 1bc4134e..826adf38 100644 --- a/Names/names.R +++ b/Names/names.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Load data allnames <- read.csv(root("Names/data","SSA-longtail-names.csv")) diff --git a/Names/names.Rmd b/Names/names.Rmd index fbeae074..4dd0fb86 100644 --- a/Names/names.Rmd +++ b/Names/names.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Load data diff --git a/Newcomb/newcomb.R b/Newcomb/newcomb.R index 8892e474..35ed5b28 100644 --- a/Newcomb/newcomb.R +++ b/Newcomb/newcomb.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/Newcomb/newcomb.Rmd b/Newcomb/newcomb.Rmd index 06d91c8f..e9dc1851 100644 --- a/Newcomb/newcomb.Rmd +++ b/Newcomb/newcomb.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/Parabola/parabola.R b/Parabola/parabola.R index 3ce846fd..1005dd2c 100644 --- a/Parabola/parabola.R +++ b/Parabola/parabola.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") rstan_options(auto_write = TRUE) diff --git a/Parabola/parabola.Rmd b/Parabola/parabola.Rmd index 9ee52faf..9bc4e90f 100644 --- a/Parabola/parabola.Rmd +++ b/Parabola/parabola.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") rstan_options(auto_write = TRUE) ``` diff --git a/Peacekeeping/peace.R b/Peacekeeping/peace.R index 1f6cc1f1..4e5d3dfa 100644 --- a/Peacekeeping/peace.R +++ b/Peacekeeping/peace.R @@ -25,7 +25,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("foreign") #' #### Load data diff --git a/Peacekeeping/peace.Rmd b/Peacekeeping/peace.Rmd index f5a1356f..f1a8e1e6 100644 --- a/Peacekeeping/peace.Rmd +++ b/Peacekeeping/peace.Rmd @@ -27,7 +27,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("foreign") ``` diff --git a/PearsonLee/heights.R b/PearsonLee/heights.R index fb847391..5387f950 100644 --- a/PearsonLee/heights.R +++ b/PearsonLee/heights.R @@ -25,7 +25,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("HistData") diff --git a/PearsonLee/heights.Rmd b/PearsonLee/heights.Rmd index 112d900a..8631c332 100644 --- a/PearsonLee/heights.Rmd +++ b/PearsonLee/heights.Rmd @@ -27,7 +27,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("HistData") ``` diff --git a/Pew/pew.R b/Pew/pew.R index 094909a7..185134e5 100644 --- a/Pew/pew.R +++ b/Pew/pew.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("foreign") #' #### Load data diff --git a/Pew/pew.Rmd b/Pew/pew.Rmd index 8024bedd..63e8e65b 100644 --- a/Pew/pew.Rmd +++ b/Pew/pew.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("foreign") ``` diff --git a/PoissonExample/poisson_regression.R b/PoissonExample/poisson_regression.R index a225e9f0..084e4b52 100644 --- a/PoissonExample/poisson_regression.R +++ b/PoissonExample/poisson_regression.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("MASS") diff --git a/PoissonExample/poisson_regression.Rmd b/PoissonExample/poisson_regression.Rmd index c5e7a749..14a650f5 100644 --- a/PoissonExample/poisson_regression.Rmd +++ b/PoissonExample/poisson_regression.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("MASS") ``` diff --git a/Pollution/pollution.R b/Pollution/pollution.R index d7c0ccc3..ea826159 100644 --- a/Pollution/pollution.R +++ b/Pollution/pollution.R @@ -27,7 +27,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' **Load packages** library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' **Load data** pollution <- read.csv(root("Pollution/data","pollution.csv")) diff --git a/Pollution/pollution.Rmd b/Pollution/pollution.Rmd index 532ab145..a5969e06 100644 --- a/Pollution/pollution.Rmd +++ b/Pollution/pollution.Rmd @@ -29,7 +29,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` **Load data** diff --git a/Poststrat/poststrat.R b/Poststrat/poststrat.R index aecd6efd..59b8892d 100644 --- a/Poststrat/poststrat.R +++ b/Poststrat/poststrat.R @@ -48,7 +48,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' ## Simulate fake data diff --git a/Poststrat/poststrat.Rmd b/Poststrat/poststrat.Rmd index a925ccee..60cb827c 100644 --- a/Poststrat/poststrat.Rmd +++ b/Poststrat/poststrat.Rmd @@ -49,7 +49,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ````{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ```` diff --git a/ProbabilitySimulation/probsim.R b/ProbabilitySimulation/probsim.R index 62613466..85ae79f3 100644 --- a/ProbabilitySimulation/probsim.R +++ b/ProbabilitySimulation/probsim.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Simulate how many girls in 400 births? n_girls <- rbinom(1, 400, 0.488) diff --git a/ProbabilitySimulation/probsim.Rmd b/ProbabilitySimulation/probsim.Rmd index 763326eb..84c2dd42 100644 --- a/ProbabilitySimulation/probsim.Rmd +++ b/ProbabilitySimulation/probsim.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Simulate how many girls in 400 births? diff --git a/Residuals/residuals.R b/Residuals/residuals.R index f733cc03..d88056b0 100644 --- a/Residuals/residuals.R +++ b/Residuals/residuals.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' ## Simple model with const term, one pre-treatment predictor, and treatment indicator diff --git a/Residuals/residuals.Rmd b/Residuals/residuals.Rmd index 62862ece..d957b59c 100644 --- a/Residuals/residuals.Rmd +++ b/Residuals/residuals.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ``` diff --git a/Restaurant/restaurant.R b/Restaurant/restaurant.R index 348a3a0f..06af39c9 100644 --- a/Restaurant/restaurant.R +++ b/Restaurant/restaurant.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") rstan_options(auto_write = TRUE) diff --git a/Restaurant/restaurant.Rmd b/Restaurant/restaurant.Rmd index 5ed88b1c..876a75c8 100644 --- a/Restaurant/restaurant.Rmd +++ b/Restaurant/restaurant.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") rstan_options(auto_write = TRUE) ``` diff --git a/RiskyBehavior/risky.R b/RiskyBehavior/risky.R index 70037447..dbbbb7b7 100644 --- a/RiskyBehavior/risky.R +++ b/RiskyBehavior/risky.R @@ -30,7 +30,7 @@ savefigs <- FALSE #' **Load packages** library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' **Load data** risky <- read.csv(root("RiskyBehavior/data","risky.csv")) diff --git a/RiskyBehavior/risky.Rmd b/RiskyBehavior/risky.Rmd index d921695a..6620bb18 100644 --- a/RiskyBehavior/risky.Rmd +++ b/RiskyBehavior/risky.Rmd @@ -33,7 +33,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` **Load data** diff --git a/Roaches/roaches.R b/Roaches/roaches.R index 18268287..f24b6138 100644 --- a/Roaches/roaches.R +++ b/Roaches/roaches.R @@ -25,7 +25,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("brms") library("loo") diff --git a/Roaches/roaches.Rmd b/Roaches/roaches.Rmd index 0e8e1098..98617825 100644 --- a/Roaches/roaches.Rmd +++ b/Roaches/roaches.Rmd @@ -27,7 +27,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("brms") library("loo") diff --git a/Rsquared/rsquared.R b/Rsquared/rsquared.R index 6b58cda6..bd0bdc8f 100644 --- a/Rsquared/rsquared.R +++ b/Rsquared/rsquared.R @@ -53,7 +53,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/Rsquared/rsquared.Rmd b/Rsquared/rsquared.Rmd index a087bb18..b8579788 100644 --- a/Rsquared/rsquared.Rmd +++ b/Rsquared/rsquared.Rmd @@ -54,7 +54,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/SampleSize/simulation.R b/SampleSize/simulation.R index 036b0c5f..b76c589c 100644 --- a/SampleSize/simulation.R +++ b/SampleSize/simulation.R @@ -21,7 +21,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' #### Simulated data 1: predictor range (-0.5, 0.5) diff --git a/SampleSize/simulation.Rmd b/SampleSize/simulation.Rmd index 3700d00a..a6492bc1 100644 --- a/SampleSize/simulation.Rmd +++ b/SampleSize/simulation.Rmd @@ -23,7 +23,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ``` diff --git a/Sesame/sesame.R b/Sesame/sesame.R index a8049ca1..f308cae2 100644 --- a/Sesame/sesame.R +++ b/Sesame/sesame.R @@ -22,7 +22,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("brms") diff --git a/Sesame/sesame.Rmd b/Sesame/sesame.Rmd index 215c572b..69ac5366 100644 --- a/Sesame/sesame.Rmd +++ b/Sesame/sesame.Rmd @@ -24,7 +24,7 @@ knitr::opts_chunk$set(message=FALSE, error=FALSE, warning=FALSE, comment=NA) ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("brms") ``` diff --git a/SexRatio/sexratio.R b/SexRatio/sexratio.R index 12d2e29d..08872e2c 100644 --- a/SexRatio/sexratio.R +++ b/SexRatio/sexratio.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") library("rstanarm") diff --git a/SexRatio/sexratio.Rmd b/SexRatio/sexratio.Rmd index 40e02163..e48ae13a 100644 --- a/SexRatio/sexratio.Rmd +++ b/SexRatio/sexratio.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") library("rstanarm") ``` diff --git a/SimpleCausal/causal.R b/SimpleCausal/causal.R index 5150a9e0..0d1be698 100644 --- a/SimpleCausal/causal.R +++ b/SimpleCausal/causal.R @@ -28,7 +28,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") # for reproducibility of simulated data SEED <- 1151 diff --git a/SimpleCausal/causal.Rmd b/SimpleCausal/causal.Rmd index 32890341..903e673f 100644 --- a/SimpleCausal/causal.Rmd +++ b/SimpleCausal/causal.Rmd @@ -30,7 +30,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") # for reproducibility of simulated data SEED <- 1151 diff --git a/Simplest/simplest.R b/Simplest/simplest.R index 71aad429..7d84c8e7 100644 --- a/Simplest/simplest.R +++ b/Simplest/simplest.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") #' ## Fitting a regression using a data frame in R diff --git a/Simplest/simplest.Rmd b/Simplest/simplest.Rmd index b441c371..cc163a40 100644 --- a/Simplest/simplest.Rmd +++ b/Simplest/simplest.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") ``` diff --git a/Simplest/simplest_lm.R b/Simplest/simplest_lm.R index 47429eac..ad28a357 100644 --- a/Simplest/simplest_lm.R +++ b/Simplest/simplest_lm.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' **Load packages** library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") #' #### Fitting a regression using a data frame in R diff --git a/Simplest/simplest_lm.Rmd b/Simplest/simplest_lm.Rmd index 7f279bb6..40d787c6 100644 --- a/Simplest/simplest_lm.Rmd +++ b/Simplest/simplest_lm.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("arm") ``` diff --git a/Stents/stents.R b/Stents/stents.R index a184edef..7e51fbd2 100644 --- a/Stents/stents.R +++ b/Stents/stents.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() #' #### Exercise time n <- c(104,90) diff --git a/Stents/stents.Rmd b/Stents/stents.Rmd index 85013117..b3690858 100644 --- a/Stents/stents.Rmd +++ b/Stents/stents.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() ``` #### Exercise time diff --git a/Storable/storable.R b/Storable/storable.R index 6bbdbfc3..822c8360 100644 --- a/Storable/storable.R +++ b/Storable/storable.R @@ -25,7 +25,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") rstan_options(auto_write = TRUE) library("rstanarm") diff --git a/Storable/storable.Rmd b/Storable/storable.Rmd index 67fa8dfd..ce26fb9c 100644 --- a/Storable/storable.Rmd +++ b/Storable/storable.Rmd @@ -27,7 +27,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstan") rstan_options(auto_write = TRUE) library("rstanarm") diff --git a/Student/student.R b/Student/student.R index 5b3ed532..a1e0addf 100644 --- a/Student/student.R +++ b/Student/student.R @@ -24,7 +24,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("rstantools") library("loo") diff --git a/Student/student.Rmd b/Student/student.Rmd index 4837e9ac..6ce442f6 100644 --- a/Student/student.Rmd +++ b/Student/student.Rmd @@ -26,7 +26,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("rstantools") library("loo") diff --git a/Unemployment/unemployment.R b/Unemployment/unemployment.R index cdc22b90..47a2da80 100644 --- a/Unemployment/unemployment.R +++ b/Unemployment/unemployment.R @@ -25,7 +25,7 @@ savefigs <- FALSE #' #### Load packages library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot") diff --git a/Unemployment/unemployment.Rmd b/Unemployment/unemployment.Rmd index 25fafaad..8e88c27a 100644 --- a/Unemployment/unemployment.Rmd +++ b/Unemployment/unemployment.Rmd @@ -27,7 +27,7 @@ savefigs <- FALSE ```{r } library("rprojroot") -root<-has_dirname("ROS-Examples")$make_fix_file() +root<-has_file(".ROS-Examples-root")$make_fix_file() library("rstanarm") library("ggplot2") library("bayesplot")