[chronojump] Encoder graph better labels

[Xavier de Blas <xaviblas src gnome org>]

commit 1690d6e25ad80a1577bb9b72a82728136ea3da58
Author: Xavier de Blas <xaviblas gmail com>
Date:   Wed Feb 13 12:00:11 2013 +0100

    Encoder graph better labels

 encoder/graph.R |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index 700ce6b..e5827e0 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -259,7 +259,7 @@ paint <- function(rawdata, eccon, xmin, xmax, yrange, knRanges, superpose, highl
 		plot(a-min(a),type="n",xlim=c(1,length(a)),ylim=ylim,xlab=xlab, ylab=ylab, col="gray", axes=F)
 
 		title(main=title,line=-2,outer=T)
-		mtext(subtitle,side=1,adj=0,cex=.8)
+		mtext(subtitle,side=3,adj=0,cex=.8)
 		
 		if(showAxes) {
 			axis(1) 	#can be added xmin
@@ -566,7 +566,7 @@ paintPowerPeakPowerBars <- function(singleFile, title, paf, myEccons, Eccon, hei
 			xlab="",ylab="Power (W)", 
 			ylim=c(lowerY,max(powerData)), xpd=FALSE) #ylim, xpd = F,  makes barplot starts high (compare between them)
 	title(main=title,line=-2,outer=T)
-	mtext("Curve\nLoad",side=1,at=0,adj=1,line=1,cex=.9)
+	mtext("Curve\nLoad",side=1,at=1,adj=0,line=1,cex=.9)
 	par(new=T, xpd=T)
 	#on ecS, concentric has high value of time to peak power and eccentric has it very low. Don't draw lines
 	if(Eccon=="ecS")