lf_bp fuckage
This commit is contained in:
parent
c0f59bc9c9
commit
31148dfbdc
1 changed files with 3 additions and 2 deletions
|
@ -57,7 +57,7 @@ lf_bp <- function(lf_df = lf_duet
|
|||
, outlier.colour = NA
|
||||
#, position = position_dodge(width = 0.9)
|
||||
, width = bp_width) +
|
||||
geom_beeswarm(priority = "density"
|
||||
geom_quasirandom(priority = "density"
|
||||
#, shape = 21
|
||||
, size = dot_size
|
||||
, alpha = dot_transparency
|
||||
|
@ -71,11 +71,12 @@ lf_bp <- function(lf_df = lf_duet
|
|||
p2 = p1 +
|
||||
#theme(legend.title=element_text('XXX')) + # Legend doesn't need a title)
|
||||
|
||||
geom_beeswarm(priority = "density"
|
||||
geom_quasirandom(priority = "density"
|
||||
#, shape = 21
|
||||
, size = dot_size
|
||||
, alpha = dot_transparency
|
||||
, show.legend = FALSE
|
||||
# , fast = FALSE
|
||||
, cex = 0.8
|
||||
, aes(colour = factor(eval(parse(text = colour_categ))) )
|
||||
#, aes(colour = Legend)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue