changeset 57:cb66d6dd1e66 draft

Uploaded
author davidvanzessen
date Tue, 01 Mar 2016 05:16:07 -0500
parents a4317b006d70
children 8bb4d6009e08
files aa_histogram.r
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/aa_histogram.r	Tue Mar 01 05:06:47 2016 -0500
+++ b/aa_histogram.r	Tue Mar 01 05:16:07 2016 -0500
@@ -37,6 +37,9 @@
 m = m + annotate("segment", x = 55.5, y = -0.07, xend=65.5, yend=-0.07, colour="darkblue", size=1) + annotate("text", x = 60.5, y = -0.15, label="CDR2")
 m = m + annotate("segment", x = 65.5, y = -0.05, xend=104.5, yend=-0.05, colour="darkgreen", size=1) + annotate("text", x = 85, y = -0.1, label="FR3")
 m = m + expand_limits(y=c(-0.1,1)) + xlab("AA position") + ylab("Frequency") + ggtitle("AA mutation frequency")
+
+print("---------------- write/print ----------------")
+
 write.table(dat_dt, paste(dirname(outfile), "/aa_histogram.txt", sep=""), sep="\t",quote=F,row.names=F,col.names=T)
 
 png(filename=outfile, width=1280, height=720)