binomial_coefficient.nbt 745 B

1234567891011121314151617181920
  1. # Binomial coefficient using Pascal's rule
  2. #
  3. # Adapted from the Python version here:
  4. # https://en.wikipedia.org/wiki/Binomial_coefficient
  5. fn binomial_coefficient(n: Scalar, k: Scalar) -> Scalar =
  6. if k < 0 || k > n
  7. then 0
  8. else if k > n - k # Take advantage of symmetry
  9. then binomial_coefficient(n, n - k)
  10. else if k == 0 || n <= 1
  11. then 1
  12. else binomial_coefficient(n - 1, k) + binomial_coefficient(n - 1, k - 1)
  13. assert_eq(binomial_coefficient(10, 0), 1)
  14. assert_eq(binomial_coefficient(10, 1), 10)
  15. assert_eq(binomial_coefficient(10, 2), 45)
  16. assert_eq(binomial_coefficient(10, 6), 210)
  17. assert_eq(binomial_coefficient(10, 9), 10)
  18. assert_eq(binomial_coefficient(10, 10), 1)