https://github.com/cran/pracma
Raw File
Tip revision: 71455748623ef69836470c75c5f9384f6e872d45 authored by HwB on 28 June 2011, 00:00:00 UTC
version 0.6-3
Tip revision: 7145574
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