https://github.com/cran/pracma
Tip revision: 8ce01a0ebcafaba3021c8ae0ffb447eeed46ed90 authored by HwB on 28 October 2012, 00:00:00 UTC
version 1.2.5
version 1.2.5
Tip revision: 8ce01a0
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))