added function for position_count_bp.R
This commit is contained in:
parent
cbb3749a21
commit
b9d176afa4
3 changed files with 164 additions and 25 deletions
|
@ -1,5 +1,5 @@
|
|||
#!/usr/bin/env Rscript
|
||||
# load libraries
|
||||
|
||||
#########################################################
|
||||
# TASK: function for basic barplot returning stability counts
|
||||
#########################################################
|
||||
|
@ -7,7 +7,7 @@
|
|||
library(ggplot2)
|
||||
theme_set(theme_grey())
|
||||
#==========================================================
|
||||
# my_stability_count(): basic barplots for stability counts
|
||||
# stability_count_bp(): basic barplots for stability counts
|
||||
# input args
|
||||
## df containing data to plot
|
||||
## df column name containing stability outcome
|
||||
|
@ -16,7 +16,7 @@ theme_set(theme_grey())
|
|||
#==========================================================
|
||||
stability_count_bp <- function(plotdf
|
||||
, df_colname
|
||||
, leg_title
|
||||
, leg_title = "Legend title"
|
||||
, axis_text_size = 25
|
||||
, axis_label_size = 22
|
||||
, leg_text_size = 20
|
||||
|
@ -47,4 +47,4 @@ stability_count_bp <- function(plotdf
|
|||
}
|
||||
#############################################################
|
||||
# end of function
|
||||
#############################################################
|
||||
#############################################################
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue