Skip to content

Commit

Permalink
Remove binomProb semicolons
Browse files Browse the repository at this point in the history
  • Loading branch information
mattfidler committed Oct 3, 2023
1 parent 17c77e8 commit e097e46
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions tests/testthat/test-binomProb.R
Original file line number Diff line number Diff line change
Expand Up @@ -8,16 +8,16 @@ test_that("test binomProb()", {
n <- 1001
z <- qnorm(1 - 0.025)
z2 <- z * z
c1 <- 2*n*m + z2;
c2 <- z*sqrt(z2 - 1.0/n + 4*n*v + (4.0*m-2.0))+1.0;
c1 <- 2*n*m + z2
c2 <- z*sqrt(z2 - 1.0/n + 4*n*v + (4.0*m-2.0))+1.0
c3 <- 2*(n+z2)
z2.5 <- (c1 + c(-1, 1) * c2) / c3

n <- 1001
z <- qnorm(1 - 0.05)
z2 <- z * z
c1 <- 2*n*m + z2;
c2 <- z*sqrt(z2 - 1.0/n + 4*n*v + (4.0*m-2.0))+1.0;
c1 <- 2*n*m + z2
c2 <- z*sqrt(z2 - 1.0/n + 4*n*v + (4.0*m-2.0))+1.0
c3 <- 2*(n+z2)
z5 <- (c1 + c(-1, 1) * c2) / c3

Expand Down

0 comments on commit e097e46

Please sign in to comment.