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

updated distribution scripts to try adding points

Browse source
This commit is contained in:
Tanushree Tunstall 2020-09-15 13:33:28 +01:00
parent 3bb2d3c78c
commit aa4294dff2
2 changed files with 7 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

10
scripts/plotting/lineage_dist_combined_PS.R
View file

@ -168,6 +168,7 @@ p1 = ggplot(df, aes(x = duet_scaled
#printFile=geom_density_ridges_gradient(
geom_density_ridges_gradient(aes(fill = ..x..)
#, jittered_points = TRUE
, scale = 3
, size = 0.3 ) +
facet_wrap( ~lineage
@ -254,12 +255,13 @@ plot_lineage_dr_duet
# output svg
#svg(plot_lineage_dr_duet)
p2 = ggplot(df_dr, aes(x = duet_scaled
, y = duet_outcome))+
#printFile=geom_density_ridges_gradient(
, y = duet_outcome))+
geom_density_ridges_gradient(aes(fill = ..x..)
#, jittered_points = TRUE
, scale = 3
, size = 0.3 ) +
, size = 0.3) +
#geom_point(aes(size = or_mychisq))+
facet_wrap( ~lineage
, scales = "free"
#, switch = 'x'