From 6858abb699a8563cf28a7f183c77b9e80c9c0b33 Mon Sep 17 00:00:00 2001 From: Ian Sealy Date: Thu, 29 Jan 2015 10:48:19 +0000 Subject: [PATCH] Smaller labels on x axis. --- script/graph_counts.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/script/graph_counts.R b/script/graph_counts.R index e106c7a..a734d88 100644 --- a/script/graph_counts.R +++ b/script/graph_counts.R @@ -29,7 +29,7 @@ for (i in 1:nrow(data)) { counts <- data[i, grepl(".normalised.count$", names(data)) ] par(mar=c(8.1, 4.1, 4.1, 2.1), xpd=TRUE) plot(as.numeric(counts), axes=FALSE, ann=FALSE, pch=21, bg=colours) - axis(1, at=1:length(labels), lab=labels, las=2) + axis(1, at=1:length(labels), lab=labels, las=2, cex.axis=0.5) axis(2) title(main=sprintf("%s:%d-%d %s\n%.2f", data[i,"Chr"], data[i,"Region.start"],