Loading bin/R/plot_barplot.R +2 −1 Original line number Diff line number Diff line Loading @@ -22,7 +22,8 @@ print(args) load(args[1]) # plot and save as a PNG file png(file = paste0("repeat_family_barplot.png"), units="in", width=6, height=6, res=300) num_families <- length(table(tab$family1)) png(file = paste0("repeat_family_barplot.png"), units="in", width=6*num_families/20, height=6, res=300) barplot(table(tab$family1), xlab="Repeat family", ylab="count", las=2) dev.off() Loading
bin/R/plot_barplot.R +2 −1 Original line number Diff line number Diff line Loading @@ -22,7 +22,8 @@ print(args) load(args[1]) # plot and save as a PNG file png(file = paste0("repeat_family_barplot.png"), units="in", width=6, height=6, res=300) num_families <- length(table(tab$family1)) png(file = paste0("repeat_family_barplot.png"), units="in", width=6*num_families/20, height=6, res=300) barplot(table(tab$family1), xlab="Repeat family", ylab="count", las=2) dev.off()