[chronojump] Fixed R2 symbol on grpah.R



commit 809986e3179b71822c0cd25336a5f170e4aa2327
Author: Xavier de Blas <xaviblas gmail com>
Date:   Mon Nov 9 09:20:02 2015 +0100

    Fixed R2 symbol on grpah.R

 encoder/graph.R |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index acdc395..5ad2f24 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -1891,8 +1891,8 @@ paintCrossVariables <- function (paf, varX, varY, option, isAlone, title, single
                                            round.scientific(coef.b), " * ", varXplot, " ", plotSign(coef.c), 
" ", 
                                            round.scientific(coef.c), sep=""), side=3, line=1, at=functionAt, 
adj=functionAdj, cex = .9)
                                mtext(paste(
-                                           "R² = ", round(summary(fit)$r.squared,4),
-                                           "; R² (adjusted) = ", round(summary(fit)$adj.r.squared,4),
+                                           "R^2 = ", round(summary(fit)$r.squared,4),
+                                           "; R^2 (adjusted) = ", round(summary(fit)$adj.r.squared,4),
                                            "; p = ", getModelPValueWithStars(fit)
                                            , sep=""), side =3, line=0, at=functionAt, adj=functionAdj, 
cex=.9)
                                #end of plot the function expression, R^2 and p


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