getwd() setwd("~/git/LSHTM_analysis/mcsm_analysis/pyrazinamide/scripts/plotting") getwd() source("../combining_two_df.R") source("../Header_TT.R") getwd() setwd("~/git/LSHTM_analysis/mcsm_analysis/pyrazinamide/scripts/plotting") getwd() source("../Header_TT.R") source("../combining_two_df.R") #<<<<<<<<<<<<<<<<<<<<<<<<< # REASSIGNMENT my_df = merged_df3_comp # delete variables not required rm(merged_df2, merged_df2_comp, merged_df3, merged_df3_comp) # quick checks colnames(my_df) str(my_df) #<<<<<<<<<<<<<<<<<<<<<<<< # REASSIGNMENT df = my_df rm(my_df) table(df$DUET_outcome)