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 |
clang-ASAN clang-UBSAN gcc-ASAN gcc-UBSAN
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