https://github.com/cran/pracma
Raw File
Tip revision: bf076735a09836a6103775a9d4efaf8f0ecad928 authored by Hans W. Borchers on 02 December 2018, 07:00:03 UTC
version 2.2.2
Tip revision: bf07673
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