replaced ± with \u00B1

qddyy · Jul 8, 2024 · 499772a · 499772a
1 parent 09e9e99
commit 499772a
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/R/PermuTest.R b/R/PermuTest.R
@@ -226,8 +226,11 @@ PermuTest <- R6Class(
                         if (p < eps) "<" else "=",
                         if (p < eps) format(eps) else format(p),
                         if (private$.type == "permu" && private$.n_permu != 0) {
-                            d <- qnorm(0.975) * sqrt(p * (1 - p) / n_used)
-                            paste("(±", format(d), "at a 95% confidence level)")
+                            q <- qnorm(0.975) * sqrt(p * (1 - p) / n_used)
+                            paste0(
+                                "(", "\u00B1 ", format(q),
+                                " at a 95% confidence level", ")"
+                            )
                         }
                     )
                 },