Apply on windows one-sided binomiminal test with H0: z <= z0

Apply on windows one-sided binomiminal test with H0: z <= z0

# S3 method for binom.test
window(above = z >= z0, h = NA, ci.level = 0.95, z, z0, ...)