[chronojump] Fixed a crash on crossVariables with 2 unique X values and trying to plot a curve



commit 88ec497a28479f28e7dd24b78b871415695af0f4
Author: Xavier de Blas <xaviblas gmail com>
Date:   Mon Jul 11 21:04:38 2016 +0200

    Fixed a crash on crossVariables with 2 unique X values and trying to plot a curve

 encoder/graph.R |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index 6086d83..3eec275 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -1665,7 +1665,7 @@ paintCrossVariables <- function (paf, varX, varY, option, dateAsX,
                }
                else {
                        #if less than 3 different X then cannot calculate fittings. Just plot here to not 
crash on stroverlap (after)
-                       if(length(unique(x)) < 2) {
+                       if(length(unique(x)) < 3) {
                                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]