https://github.com/cran/pracma
Raw File
Tip revision: 3f1c6b45c918375fc2b65bb2a7d6e3590979cb61 authored by HwB on 12 December 2011, 00:00:00 UTC
version 0.9.1
Tip revision: 3f1c6b4
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