Skip to content

Commit

Permalink
clean
Browse files Browse the repository at this point in the history
  • Loading branch information
audreyyeoCH committed Oct 19, 2024
1 parent 09a3744 commit 5dce59e
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions examples/boundsPredprob.R
Original file line number Diff line number Diff line change
Expand Up @@ -2,9 +2,9 @@
# Final efficacy decision if more than 80% probability to be above 20% ORR,
# Final futility decision otherwise.
# Interim efficacy decision if more than 90% predictive probability reach this or
# Efficacy look Pr(Pr(P > p0 | x, Y, a, b) >= tT | x) >= phiU,
# Efficacy look Pr(Pr(P > p0 | x, Y) >= tT | x) >= phiU,
# Interim futility decision if less than 10% predictive probability or
# Futility look Pr(Pr(P > p0 | x, Y, a, b) >= tT | x) =< phiL
# Futility look Pr(Pr(P > p0 | x, Y) >= tT | x) =< phiL
# Uniform prior (i.e. beta(1, 1)) on the ORR:
boundsPredprob(
looks = c(10, 20, 30, 40),
Expand All @@ -18,9 +18,9 @@ boundsPredprob(
# Efficacy decision if more than 80% probability to be above 20% ORR,
# Final futility decision otherwise.
# Interim efficacy decision if more than 90% predictive probability reach this or
# Efficacy look Pr(Pr(P > p0 | x, Y, a, b) >= tT | x) >= phiU,
# Efficacy look Pr(Pr(P > p0 | x, Y) >= tT | x) >= phiU,
# Interim futility decision if less than 60% predictive probability or
# Futility look Pr(Pr(P > p0 | x, Y, a, b) >= tT | x) =< phi
# Futility look Pr(Pr(P > p0 | x, Y) >= tT | x) =< phi
# with mixed prior and weights:
boundsPredprob(
looks = c(7, 15, 25),
Expand Down

0 comments on commit 5dce59e

Please sign in to comment.