Fix typo

SPLICE/vignettes/SPLICE-demo.Rmd

@@ -431,7 +431,7 @@ Minor revisions may occur simultaneously with a partial payment, or at any other
 ### Example 2.1.1 Default implementation {#ex2.1.1}
 ```{r}
 ## input
-# package default function for frequency of minor revisions at partial payments
+# package default function for frequency of minor revisions NOT at partial payments
 dflt.minRev_freq_notatP_function <- function(n, setldel) {
   # setldel = settlement delay
   minRev_freq_notatP <- stats::rgeom(n, prob = 1 / (min(3, setldel/4) + 1))