Fix subsetting in addTRIX (fix #72)

The trix object is a matrix; subsetting by i only returns the first
column as a vector. This is a problem because chartTRIX expects
chobTA@TA.values to be a matrix.

R/addTA.R

@@ -347,7 +347,7 @@ function(x) {
 
   trix <- TRIX(xx,n=n,nSig=signal,maType=maType,percent=percent)
 
-  chobTA@TA.values <- trix[lchob@xsubset]
+  chobTA@TA.values <- trix[lchob@xsubset,]
 
   chobTA@name <- "chartTRIX"
   chobTA@call <- match.call()