diff --git a/.Rprofile b/.Rprofile index 31052bc..ec4ba33 100644 --- a/.Rprofile +++ b/.Rprofile @@ -1,3 +1,6 @@ -tryCatch(source("renv/activate.R"), error = function(e) message("`renv::activate()` not required in Docker\nIf you're not in Docker, something's gone wrong!")) +a <- readline("Do you want to use `renv::activate`? (Warning: not useable within Docker!) [Y/n]\n") + +if (a != "n") {source("renv/activate.R")} else {message("renv not activated, continuing...")} + message('You are in your Teen Preg project') pts <- function(size) return(size*5/14)