# Reading a CSV file for an example:
dir <- system.file("extdata", package = "DEGRE")
results_DEGRE_example <- read.csv(file.path(dir,"results_DEGRE_example.csv"))
# Running the BarGraphDEGRE function
BarGraphDEGRE(results = results_DEGRE_example,
log2FC_cutoff = 1,
downregulated_color = "coral2",
upregulated_color = "cornflowerblue",
xlab = "Regulation",
ylab = "Number of genes",
font.x = 10,
font.y = 10,
font.tickslab = 10,
legend_position = "right",
legend.title = "Regulation")
Run the code above in your browser using DataLab