update rng

snaketron · Feb 14, 2024 · fa486a4 · fa486a4
1 parent da979c8
commit fa486a4
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 21 deletions.
diff --git a/inst/stan/dgu_rep.stan b/inst/stan/dgu_rep.stan
@@ -11,14 +11,11 @@ functions {
   }
 
   int zibb_rng(int y, int n, real mu, real phi, real kappa) {
-    if(y==0) {
-      if (bernoulli_rng(kappa) == 1) {
-        return (0);
-      } else {
-        return (beta_binomial_rng(n, mu * phi, (1 - mu) * phi));
-      }
+    if (bernoulli_rng(kappa) == 1) {
+      return (0);
+    } else {
+      return (beta_binomial_rng(n, mu * phi, (1 - mu) * phi));
     }
-    return (beta_binomial_rng(n, mu * phi, (1 - mu) * phi));
   }
 
   real z_rng(real a, real b, real zi) {

diff --git a/inst/stan/gu.stan b/inst/stan/gu.stan
@@ -11,14 +11,11 @@ functions {
   }
 
   int zibb_rng(int y, int n, real mu, real phi, real kappa) {
-    if(y==0) {
-      if (bernoulli_rng(kappa) == 1) {
-        return (0);
-      } else {
-        return (beta_binomial_rng(n, mu * phi, (1 - mu) * phi));
-      }
+    if (bernoulli_rng(kappa) == 1) {
+      return (0);
+    } else {
+      return (beta_binomial_rng(n, mu * phi, (1 - mu) * phi));
     }
-    return (beta_binomial_rng(n, mu * phi, (1 - mu) * phi));
   }
 
   real z_rng(real a, real b, real zi) {

diff --git a/inst/stan/gu_rep.stan b/inst/stan/gu_rep.stan
@@ -11,14 +11,11 @@ functions {
   }
 
   int zibb_rng(int y, int n, real mu, real phi, real kappa) {
-    if(y==0) {
-      if (bernoulli_rng(kappa) == 1) {
-        return (0);
-      } else {
-        return (beta_binomial_rng(n, mu * phi, (1 - mu) * phi));
-      }
+    if (bernoulli_rng(kappa) == 1) {
+      return (0);
+    } else {
+      return (beta_binomial_rng(n, mu * phi, (1 - mu) * phi));
     }
-    return (beta_binomial_rng(n, mu * phi, (1 - mu) * phi));
   }
 
   real z_rng(real a, real b, real zi) {