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

saving work for the day

Browse source
This commit is contained in:
Tanushree Tunstall 2021-09-02 17:40:24 +01:00
parent a981580b7a
commit 605eb54526
3 changed files with 14 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

8
scripts/functions/lf_bp.R
View file

@ -24,7 +24,7 @@ lf_bp <- function(lf_df
, my_pts = 22 # plot title size)
, make_boxplot = FALSE
, bp_width = c("auto", 0.5)
, add_stats = FALSE
, add_stats = TRUE
, stat_grp_comp = c("DM", "OM")
, stat_method = "wilcox.test"
, my_paired = FALSE
@ -104,8 +104,10 @@ lf_bp <- function(lf_df
OutPlot = OutPlot + stat_compare_means(comparisons = my_comparisonsL
, method = stat_method
, paired = my_paired
, label = stat_label[1])
}
, label = stat_label[2])
return(OutPlot)
}
return(OutPlot)
}