## Project Initialisation
rm(list = ls())
options(encoding = "UTF-8")
devtools::load_all()
use_r_packages()
## Project Initialisation
rm(list = ls())
working_location <- getwd()
working_location <- paste0(working_location, "/")
setwd(working_location)
source("0_portfolio_test.R")
source("0_graphing_functions.R")
source("0_reporting_functions.R")
source("0_portfolio_input_check_functions.R")
source("0_global_functions.R")
source("0_sda_approach.R")
project_name <- "BondsTest"
twodii_internal <- TRUE
run_remotely <- FALSE
# TRUE or FALSE: TRUE means that the code is running on a 2dii laptop with dropbox connection
#####################################################################
### ONLY FOR EXTERNAL PROJECTS (twodii_internal <- FALSE):
# Variables must exist for internal projects
project_location_ext <- "C:/Users/clare/Desktop/ExternalTest"
data_location_ext <- "C:/Users/clare/Desktop/Git/pacta-data/2019Q4"
#####################################################################
create_project_folder(project_name, twodii_internal, project_location_ext)
set_project_paths(project_name, twodii_internal, project_location_ext)
copy_files(project_name)
options(r2dii_config = paste0(par_file_path, "/AnalysisParameters.yml"))
set_global_parameters(paste0(par_file_path, "/AnalysisParameters.yml"))
analysis_inputs_path <- set_analysis_inputs_path(twodii_internal, data_location_ext, dataprep_timestamp)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.