https://github.com/cran/pracma
Raw File
Tip revision: 579123307d89d9c83ce74568d6dfb56864019c93 authored by Hans W. Borchers on 05 February 2014, 00:00:00 UTC
version 1.6.4
Tip revision: 5791233
polyadd.R
##
##  p o l y m u l . R  Test suite
##


polyadd <- pracma::polyadd

identical(polyadd(c(1, 1, 1), 1), c(1, 1, 2))
identical(polyadd(c(1, 1, 1), c(0, 1)), c(1, 1, 2))
identical(polyadd(c(0.5, 1, 1), c(0.5, 1, -1)), c(1, 2, 0))
identical(polyadd(c(0.5, 1, 1), c(-0.5, -1, 1)), c(2))
identical(polyadd(c(0, 0, 1, 2, 2), c(0, 1, 2, 3, 4)), c(1, 3, 5, 6))
back to top