scripts/data-prep_scenario.R

In n8thangreen/ltbiScreenLite: ltbiScreenLite

#' ---
#' title: "LTBI screening model:
#' prep scenario decision tree cost & QALY data"
#'
#' author: "N Green"
#' date: "`r format(Sys.Date())`"
#' output:
#'   html_document:
#'     keep_md: TRUE
#' ---


## grid of values/design
# file_tag <- "_baseline"
# file_tag <- "_effective-cost"
# file_tag <- "_Excel_test"
# file_tag <- "_ff"
# file_tag <- "_ff_current_tech"
# file_tag <- "_ff_future_effic_GBP25"
# file_tag <- "_ff_future_effic_GBP50"
# file_tag <- "_ff_future_effic_GBP100"
# file_tag <- "_ff_future_test"
# file_tag <- "_future_test"
# file_tag <- "_tornado"
# file_tag <- "_lhc"
# file_tag <- "_testcost"
# file_tag <- "_1"
# file_tag <- "_2"
# file_tag <- "_2_effic60"
file_tag <- "_2_effic65"
# file_tag <- "_2_effic70"
# file_tag <- "_2_effic75"
# file_tag <- "_2_effic80"
# file_tag <- "_2_effic85"
# file_tag <- "_2_effic90"
# file_tag <- "_2_effic95"
# file_tag <- "_2_effic100"
# file_tag <- "_3"
# file_tag <- "_4"
# file_tag <- "_6_25GBP"
# file_tag <- "_6_50GBP"
# file_tag <- "_6_100GBP"

create_and_save_scenarios(file_tag)