6 October 2025   6:02:32.511 PM
 
asa189_test():
  Fortran90 version
  Test asa189().
  Applied Statistics Algorithm 189
  Estimate the parameters A and B of a 
  beta binomial distribution.
 
  Exact values:
 
          A             B                MU         THETA
 
         2.00000       3.00000      0.400000      0.200000    
 
  Estimated values:
 
Samples   A_est         B_est        MU_est     THETA_est
 
   100   2.08251       2.86364      0.421037      0.202177    
  1000   1.85160       2.85261      0.393604      0.212576    
 10000   2.07646       3.16339      0.396282      0.190845    
100000   2.02059       3.01885      0.400955      0.198434    
 
asa189_test():
  Normal end of execution.
 
 6 October 2025   6:02:32.562 PM