https://github.com/cran/pracma
Raw File
Tip revision: 63e8a52ae6668e736720c89691352d6dc3bc9eb1 authored by HwB on 17 January 2012, 00:00:00 UTC
version 0.9.6
Tip revision: 63e8a52
polymul.R
##
##  p o l y m u l . R  Test suite
##


polymul <- pracma::polymul

identical(polymul(c(0.5), c(2, 4, 8)), c(1, 2, 4))
identical(polymul(c(2.5, 1.5, 0.5), c(2)), c(5, 3, 1))
identical(polymul(c(1, 1, 1), c(0, 1, 1, 1)), c(1, 2, 3, 2, 1))
identical(polymul(c(1, 0, 0), c(0, 0, 1)), c(1, 0, 0))
back to top