#!/usr/bin/env Rscript   
#=============
# Data: Input
#==============
source("~/git/LSHTM_analysis/config/pnca.R")
source("~/git/LSHTM_analysis/scripts/plotting/get_plotting_dfs.R")
####################################################
class(merged_df3)

df3 = subset(merged_df3, select = -c(pos_count))

#=======
# output
#=======
outdir_images = paste0("~/git/Writing/thesis/images/results/", tolower(gene), "/")
cat("plots will output to:", outdir_images)