CRAN Package Check Results for Package polynomial

Last updated on 2021-02-22 20:48:54 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-fedora-clang 0.1.0 51.80 ERROR
r-devel-linux-x86_64-fedora-gcc 0.1.0 41.03 OK
r-patched-solaris-x86 0.1.0 59.40 OK

Additional issues

clang-ASAN clang-UBSAN gcc-ASAN gcc-UBSAN

Check Details

Version: 0.1.0
Check: examples
Result: ERROR
    Running examples in ‘polynomial-Ex.R’ failed
    The error most likely occurred in:
    
    > ### Name: CommonPolynomials
    > ### Title: Common Polynomials
    > ### Aliases: CommonPolynomials Abel Bessel rBessel Chebyshev Chebyshev1
    > ### Chebyshev2 ChebyshevT ChebyshevU Cyclotomic Hermite
    >
    > ### ** Examples
    > ## Don't show:
    > opar <- graphics::par(mar = c(5.1, 4.5, 2.1, 0.4))
    > ## End(Don't show)
    > colours <- grDevices::palette.colors()[c("vermillion", "bluishgreen",
    + "blue", "skyblue", "reddishpurple", "orange")]
    >
    >
    > ## Abel polynomials
    > n <- 0:4
    > plot(
    + xlim = c(-3, 6), ylim = c(-20, 30),
    + panel.first = graphics::grid(col = "gray69"),
    + x = NA_real_, y = NA_real_,
    + xlab = "x", ylab = as.call(list(call("[", as.symbol("p"),
    + as.symbol("n")), as.symbol("x"))),
    + main = "Abel Polynomials"
    + )
    > for (i in seq_along(n)) {
    + graphics::lines(as.polynomial(Abel(n[[i]])),
    + col = colours[[i]], n = 1001, lwd = 2,
    + xlim = graphics::par("usr")[1:2])
    + }
    > graphics::box()
    > graphics::legend(
    + x = "bottomright",
    + legend = as.expression(lapply(X = n, FUN = function(n1) {
    + call("==", as.symbol("n"), n1)
    + })),
    + col = colours[seq_along(n)],
    + lwd = 2,
    + bty = "n"
    + )
    > graphics::title(sub = ~"All with" ~ list(a == 1), adj = 1)
    >
    >
    > ## Bessel polynomials
    > n <- 0:5
    > plot(
    + xlim = c(-3, 6), ylim = c(-10, 20),
    + panel.first = graphics::grid(col = "gray69"),
    + x = NA_real_, y = NA_real_,
    + xlab = "x", ylab = as.call(list(call("[", as.symbol("y"),
    + as.symbol("n")), as.symbol("x"))),
    + main = "Bessel Polynomials"
    + )
    > for (i in seq_along(n)) {
    + graphics::lines(as.polynomial(Bessel(n[[i]])),
    + col = colours[[i]], n = 1001, lwd = 2,
    + xlim = graphics::par("usr")[1:2])
    + }
    > graphics::box()
    > graphics::legend(
    + x = "bottomright",
    + legend = as.expression(lapply(X = n, FUN = function(n1) {
    + call("==", as.symbol("n"), n1)
    + })),
    + col = colours[seq_along(n)],
    + lwd = 2,
    + bty = "n"
    + )
    >
    >
    > ## Reverse Bessel polynomials
    > n <- 0:5
    > plot(
    + xlim = c(-10, 10), ylim = c(-10, 20),
    + panel.first = graphics::grid(col = "gray69"),
    + x = NA_real_, y = NA_real_,
    + xlab = "x", ylab = as.call(list(call("[", as.symbol("theta"),
    + as.symbol("n")), as.symbol("x"))),
    + main = "Reverse Bessel Polynomials"
    + )
    > for (i in seq_along(n)) {
    + graphics::lines(as.polynomial(rBessel(n[[i]])),
    + col = colours[[i]], n = 1001, lwd = 2,
    + xlim = graphics::par("usr")[1:2])
    + }
    > graphics::box()
    > graphics::legend(
    + x = "bottomright",
    + legend = as.expression(lapply(X = n, FUN = function(n1) {
    + call("==", as.symbol("n"), n1)
    + })),
    + col = colours[seq_along(n)],
    + lwd = 2,
    + bty = "n"
    + )
    >
    >
    > ## Chebyshev polynomials of the first kind
    > n <- 0:4
    > plot(
    + xlim = c(-1, 1), ylim = c(-1, 1),
    + panel.first = graphics::grid(col = "gray69"),
    + x = NA_real_, y = NA_real_,
    + xlab = "x", ylab = as.call(list(call("[", as.symbol("T"),
    + as.symbol("n")), as.symbol("x"))),
    + main = "Chebyshev polynomials of the first kind"
    + )
    > for (i in seq_along(n)) {
    + graphics::lines(as.polynomial(Chebyshev1(n[[i]])),
    + col = colours[[i]], n = 1001, lwd = 2,
    + xlim = graphics::par("usr")[1:2]
    + )
    + }
    > graphics::box()
    > graphics::legend(
    + x = "bottomright",
    + legend = as.expression(lapply(X = n, FUN = function(n1) {
    + call("==", as.symbol("n"), n1)
    + })),
    + col = colours[seq_along(n)],
    + lwd = 2,
    + bty = "n"
    + )
    >
    >
    > ## Chebyshev polynomials of the second kind
    > n <- 0:4
    > plot(
    + xlim = c(-1, 1), ylim = c(-4, 5),
    + panel.first = graphics::grid(col = "gray69"),
    + x = NA_real_, y = NA_real_,
    + xlab = "x", ylab = as.call(list(call("[", as.symbol("U"),
    + as.symbol("n")), as.symbol("x"))),
    + main = "Chebyshev polynomials of the second kind"
    + )
    > for (i in seq_along(n)) {
    + graphics::lines(as.polynomial(Chebyshev2(n[[i]])),
    + col = colours[[i]], n = 1001, lwd = 2,
    + xlim = graphics::par("usr")[1:2]
    + )
    + }
    > graphics::box()
    > graphics::legend(
    + x = "bottomright",
    + legend = as.expression(lapply(X = n, FUN = function(n1) {
    + call("==", as.symbol("n"), n1)
    + })),
    + col = colours[seq_along(n)],
    + lwd = 2,
    + bty = "n"
    + )
    >
    >
    > ## Cyclotomic polynomials
    > n <- 1:5
    > plot(
    + xlim = c(-3, 3), ylim = c(-10, 10),
    + panel.first = graphics::grid(col = "gray69"),
    + x = NA_real_, y = NA_real_,
    + xlab = "x", ylab = as.call(list(call("[", as.symbol("Phi"),
    + as.symbol("n")), as.symbol("x"))),
    + main = "Cyclotomic Polynomials"
    + )
    > for (i in seq_along(n)) {
    + graphics::lines(as.polynomial(Cyclotomic(n[[i]])),
    + col = colours[[i]], n = 1001, lwd = 2,
    + xlim = graphics::par("usr")[1:2]
    + )
    + }
    > graphics::box()
    > graphics::legend(
    + x = "bottomright",
    + legend = as.expression(lapply(X = n, FUN = function(n1) {
    + call("==", as.symbol("n"), n1)
    + })),
    + col = colours[seq_along(n)],
    + lwd = 2,
    + bty = "n"
    + )
    >
    >
    > ## Hermite polynomials
    > n <- 0:5
    > plot(
    + xlim = c(-3, 6), ylim = c(-10, 20),
    + panel.first = graphics::grid(col = "gray69"),
    + x = NA_real_, y = NA_real_,
    + xlab = "x", ylab = as.call(list(call("[", as.symbol("H"),
    + as.symbol("n")), as.symbol("x"))),
    + main = "Hermite Polynomials"
    + )
    > for (i in seq_along(n)) {
    + graphics::lines(as.polynomial(Hermite(n[[i]])),
    + col = colours[[i]], n = 1001, lwd = 2,
    + xlim = graphics::par("usr")[1:2]
    + )
    + }
    
     *** caught segfault ***
    address (nil), cause 'unknown'
    
    Traceback:
     1: as.polynomial(Hermite(n[[i]]))
     2: graphics::lines(as.polynomial(Hermite(n[[i]])), col = colours[[i]], n = 1001, lwd = 2, xlim = graphics::par("usr")[1:2])
    An irrecoverable exception occurred. R is aborting now ...
Flavor: r-devel-linux-x86_64-fedora-clang