Fix syntax glitch in dNmixture

nimble-dev · Feb 20, 2020 · 9d65989 · 9d65989
1 parent e5cc9d7
commit 9d65989
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/dNmixture.R b/R/dNmixture.R
@@ -178,7 +178,8 @@ dNmixture_v <- nimbleFunction(
     }
     if (Nmax == -1) {
       Nmax <- max(x + qpois(0.99999, lambda * (1 - prob)))
-    }    Nmin <- max( max(x), Nmin ) ## set Nmin to at least the largest x
+    }
+    Nmin <- max( max(x), Nmin ) ## set Nmin to at least the largest x
 
     logProb <- -Inf
     if (Nmax > Nmin) {