Untitled

library(TrialSize)
prevalance=0.1

OneSampleProportion.NIS(alpha=0.05, beta=0.8, p=0.65, delta=0, differ=-0.05)/prevalance

[1] 587.1159

prevalance=0.2

OneSampleProportion.NIS(alpha=0.05, beta=0.8, p=0.65, delta=0, differ=-0.05)/prevalance

[1] 293.5579

prevalance=0.3

OneSampleProportion.NIS(alpha=0.05, beta=0.8, p=0.65, delta=0, differ=-0.05)/prevalance

[1] 195.7053

prevalance=0.4

OneSampleProportion.NIS(alpha=0.05, beta=0.8, p=0.65, delta=0, differ=-0.05)/prevalance

[1] 146.779

prevalance=0.1

OneSampleProportion.NIS(alpha=0.05, beta=0.8, p=0.65, delta=0, differ=-0.05)/(1-prevalance)

[1] 65.2351

prevalance=0.2

OneSampleProportion.NIS(alpha=0.05, beta=0.8, p=0.65, delta=0, differ=-0.05)/(1-prevalance)

[1] 73.38948

prevalance=0.3

OneSampleProportion.NIS(alpha=0.05, beta=0.8, p=0.65, delta=0, differ=-0.05)/(1-prevalance)

[1] 83.8737

prevalance=0.4

OneSampleProportion.NIS(alpha=0.05, beta=0.8, p=0.65, delta=0, differ=-0.05)/(1-prevalance)

[1] 97.85265

```