tweak error message

vegandevs · 91435e0f6a04cd3cbc0a3276e0a15e11764904ca · jarioksa committed Jul 2, 2017 · Jul 2, 2017 · 91435e0
1 parent eb88ef5
commit 91435e0f6a04cd3cbc0a3276e0a15e11764904ca
Unified Split

Showing with 2 additions and 2 deletions.

+2 −2 src/getF.c
diff --git a/src/getF.c b/src/getF.c
@@ -159,8 +159,8 @@ SEXP do_getF(SEXP perms, SEXP E, SEXP QR, SEXP QZ, SEXP effects,
     /* check that permutations matrix has correct number of
      * observations */
     if (ncols(perms) != nr)
-	error("permutations matrix has %d columns, should have %d",
-	      ncols(perms), nr);
+	error("\'permutations\' matrix should have %d columns, but it has %d",
+	      nr, ncols(perms));
     double ev1, ev0, ev;
     SEXP ans = PROTECT(allocMatrix(REALSXP, nperm, nterms + 1));
     double *rans = REAL(ans);