[chronojump] Fixed commit: "Fixed minimum points in crossVariable profiles"



commit 1dbbe67fff6970f8b3564be6c60a3222211245a5
Author: Xavier de Blas <xaviblas gmail com>
Date:   Tue Apr 10 14:23:19 2018 +0200

    Fixed commit: "Fixed minimum points in crossVariable profiles"

 encoder/graph.R |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index 8d85099..42ab482 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -1890,8 +1890,8 @@ paintCrossVariables <- function (paf, varX, varY, option,
                 }
                 else {
                         #if less than 3 different X then cannot calculate fittings. Just plot here to not 
crash on stroverlap (after)
-                        if((varY == "Power" && varX == "Load" && length(unique(x)) < 3) ||
-                           length(unique(x)) < 2) {
+                        if( (varY == "Power" && length(unique(x)) < 3) ||
+                           length(unique(x)) < 2 ) {
                                 plot(x,y, xlab=varXut, ylab="", pch=pchVector, 
col=colBalls,bg=bgBalls,cex=cexBalls,axes=F)
                                 
                                 paintCrossVariablesLaterality(x, y, laterality, colBalls)


[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]