https://github.com/cran/pracma
Raw File
Tip revision: 6b5162225f1e90f742ac53c32bf06c8053cff577 authored by HwB on 26 July 2011, 00:00:00 UTC
version 0.7.5
Tip revision: 6b51622
pascal.R
##
##  p a s c a l . R  Test Suite
##

pascal <- pracma::pascal
nchoosek <- pracma::nchoosek

identical(pascal(3),
          matrix(c(1, 1, 1, 1, 2, 3, 1, 3, 6), 3, 3))

identical(nchoosek(6, 1), choose(6, 1))
identical(nchoosek(6, 2), choose(6, 2))
identical(nchoosek(6, 3), choose(6, 3))
identical(nchoosek(6, 4), choose(6, 4))
identical(nchoosek(6, 5), choose(6, 5))
identical(nchoosek(6, 6), choose(6, 6))
back to top