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

saving work after correlation plots

Browse source
This commit is contained in:
Tanushree Tunstall 2020-09-09 20:56:07 +01:00
parent 9bee97052e
commit fc47c58f91
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
scripts/plotting/corr_plots.R
View file

@ -80,6 +80,8 @@ rm( merged_df2, merged_df2_comp, merged_df2_lig, merged_df2_comp_lig, my_df_u, m
#=========================== #===========================
# Data for Correlation plots:PS # Data for Correlation plots:PS
#=========================== #===========================
table(df_ps$duet_outcome)
# adding log cols # adding log cols
df_ps$log10_or_mychisq = log10(df_ps$or_mychisq) df_ps$log10_or_mychisq = log10(df_ps$or_mychisq)
df_ps$neglog_pval_fisher = -log10(df_ps$pval_fisher) df_ps$neglog_pval_fisher = -log10(df_ps$pval_fisher)
@ -172,6 +174,7 @@ dev.off()
#=========================== #===========================
# Data for Correlation plots: LIG # Data for Correlation plots: LIG
#=========================== #===========================
table(df_lig$ligand_outcome)
df_lig$log10_or_mychisq = log10(df_lig$or_mychisq) df_lig$log10_or_mychisq = log10(df_lig$or_mychisq)
df_lig$neglog_pval_fisher = -log10(df_lig$pval_fisher) df_lig$neglog_pval_fisher = -log10(df_lig$pval_fisher)