diff --git a/plot.R b/plot.R deleted file mode 100644 index 3f502a4..0000000 --- a/plot.R +++ /dev/null @@ -1,15 +0,0 @@ -library(ggplot2) - -gene <- read.csv2(snakemake@input[[1]], dec = ",") -colnames(gene) <- "id" -gene$id <- as.numeric(gene$id) - -print(paste0("I'm plotting the file ", snakemake@wildcards[["file"]])) - -pdf(file = snakemake@output[[1]]) - -ggplot(gene, aes(x = id)) + - geom_density(alpha = .2, fill = "#FF6666") + - ggtitle(paste0("Plot "), snakemake@wildcards[["file"]]) - -dev.off() \ No newline at end of file