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

saving work

Browse source
This commit is contained in:
Tanushree Tunstall 2022-08-27 23:11:44 +01:00
parent c3067b9176
commit da8a1069a8
3 changed files with 2 additions and 221 deletions
Download patch file Download diff file Expand all files Collapse all files

4
scripts/plotting/plotting_thesis/alr/gg_pairs_all_alr.R
View file

@ -5,7 +5,7 @@
#=======
# output
#=======
outdir_images = paste0("/home/pub/Work/LSHTM/Thesis_Plots/pairs/")
#outdir_images = paste0("/home/pub/Work/LSHTM/Thesis_Plots/pairs/")
#cat("plots will output to:", outdir_images)
custom_cor <- function(data, mapping, method, ...){
@ -80,7 +80,7 @@ corr_plotdf = corr_data_extract(merged_df3
aff_dist_cols = colnames(corr_plotdf)[grep("Dist", colnames(corr_plotdf))]
static_cols = c("Log10(MAF)"
, "Log10(OR)"
#, "Log10(OR)"
)
############################################################
#=============================================