tanu/LSHTM_analysis
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

minor tweak to plotting_globals.R to make gene_match a global var

Browse source
This commit is contained in:
Tanushree Tunstall 2021-06-11 11:21:20 +01:00
parent 29fa99b914
commit d9e00b9a42
2 changed files with 9 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

5
scripts/functions/plotting_globals.R
View file

@ -11,8 +11,6 @@
# output: dir names for input and output files
import_dirs <- function(drug, gene) {
gene_match = paste0(gene,"_p.")
cat(gene_match)
#============================
# directories and variables
@ -26,6 +24,7 @@ import_dirs <- function(drug, gene) {
dr_muts_col <<- paste0('dr_mutations_', drug)
other_muts_col <<- paste0('other_mutations_', drug)
resistance_col <<- "drtype"
gene_match <<- paste0(gene,"_p.")
}
@ -58,4 +57,4 @@ mcsm_red1 <<- "#f8766d"
mcsm_mid <<- "white" # middle
mcsm_blue1 <<- "#00bfc4"
mcsm_blue2 <<- "#007d85" # most positive
mcsm_blue2 <<- "#007d85" # most positive