Hotfix p-value chi-square Logistic Regression

@JohnnyDoorn found this critical bug playing around with
jasp-stats · Oct 12, 2017 · 2f1909f · 2f1909f
1 parent f0f5363
commit 2f1909f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/JASP-Engine/JASP/R/commonglm.R b/JASP-Engine/JASP/R/commonglm.R
@@ -688,7 +688,7 @@
   if (chisq == 0) {
     p <- NULL
   } else {
-    p <- dchisq(chisq, df)
+    p <- 1-pchisq(chisq, df)
   }
   return(list(stat = chisq, df = df, pval = p))
 }