## fictious example
computeAlphaLevel(3, c(0.33,0.66,1),c(0.33,0.66,1), c(-1,0,1), c(2,3,4),0.2, 25)
## with following result:
# $probAndStop
# [1] 0.1621561 1.0000000 1.0000000
#
# $probAndExceedingUpper
# [1] 2.970758e-02 7.447682e-04 9.675729e-06
#
# $probAndExceedingLower
# [1] 0.1324485 0.3115237 0.3327052
#
# $expectedStoppingTime
# [1] 0
#
# $totalTypeOneError
# [1] 0.8071395
#
Run the code above in your browser using DataLab