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

save content

Browse source
This commit is contained in:
Tanushree Tunstall 2022-01-26 11:34:59 +00:00
parent 1c1e98ad4f
commit b133b8be24
4 changed files with 5 additions and 20 deletions
Download patch file Download diff file Expand all files Collapse all files

13
scripts/functions/logoP.R
View file

@ -4,7 +4,6 @@
# one with OR
# --> select/drop down option to remove empty positions
# --> easy peasy, just select the merged_df3_comp
# --> select/drop down option for colour
# --> if clustalx and taylor, set variable to black bg + white font
# --> if chemistry and hydrophobicity, then grey bg + black font
@ -17,13 +16,6 @@
# --> select/drop down option for colour
# --> should include WT
# Data used
#wide_df_or # or logo plot
#wide_df_or_mult # > 1 sites
#wide_df_logor_m #make it as a scale option. REDUNDANT
#tab_mt # mutant logo plot
#tab_wt # wt logo plot
# Make it hover over position and then get the corresponding data table!
#%%======================================================================
@ -40,9 +32,6 @@
#, xtt_col =
#, ytt_col =
# ADD legend for hydrophobicity: done
# ADD option to remove empty positions
LogoPlotCustomH <- function(plot_df
, x_axis_colname = "position"
, y_axis_colname = "or_mychisq"
@ -198,4 +187,4 @@ LogoPlotCustomH <- function(plot_df
return(LogoPlot)
}
}