added TASK at the beginning of the scripts

This commit is contained in:
Tanushree Tunstall 2020-11-02 16:36:52 +00:00
parent 8033c1785f
commit a4d305d44b
3 changed files with 37 additions and 2 deletions

View file

@ -3,7 +3,22 @@ getwd()
setwd("~/git/mosaic_2020/")
getwd()
############################################################
# TASK: boxplots with stats
# TASK: Boxplots with stats
# for each mediator, at each timepoint by group
# Handles some error: i.e will continue plotting even if there
# is stats error. However, needs fixing see below point 1):
# FIXME:
# 1) For a given mediator, if there is error for ANY timepoint
# stats will not be added for the entire plot!
# 2) make the function more generic to take the following inputs
# df, column, group
# this way you can directly pass the log_calculated value column
# To be handled in
# next iteration!
############################################################
is.error <- function(x) inherits(x, "try-error")