Running ‘test-all.R’ [6s/8s]
Running the tests in ‘tests/test-all.R’ failed.
Complete output:
  > library(testthat)
  > library(pvar)
  > 
  > 
  > 
  > test_package("pvar")
  ── 1. Error: Basic (@test-PvarBreakTest.R#8)  ──────────────────────────────────
  cannot open file 'Rplots.pdf'
  1: plot(Test) at /home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/pvar/tests/test-PvarBreakTest.R:8
  2: plot.PvarBreakTest(Test)
  3: par(mfrow = c(2, 1), mar = c(5.1, 4.1, 2.1, 2.1))
  4: (function (file = if (onefile) "Rplots.pdf" else "Rplot%03d.pdf", width, height, 
         onefile, family, title, fonts, version, paper, encoding, bg, fg, pointsize, pagecentre, 
         colormodel, useDingbats, useKerning, fillOddEven, compress) 
     {
         initPSandPDFfonts()
         new <- list()
         if (!missing(width)) 
             new$width <- width
         if (!missing(height)) 
             new$height <- height
         if (!missing(onefile)) 
             new$onefile <- onefile
         if (!missing(title)) 
             new$title <- title
         if (!missing(fonts)) 
             new$fonts <- fonts
         if (!missing(version)) 
             new$version <- version
         if (!missing(paper)) 
             new$paper <- paper
         if (!missing(encoding)) 
             new$encoding <- encoding
         if (!missing(bg)) 
             new$bg <- bg
         if (!missing(fg)) 
             new$fg <- fg
         if (!missing(pointsize)) 
             new$pointsize <- pointsize
         if (!missing(pagecentre)) 
             new$pagecentre <- pagecentre
         if (!missing(colormodel)) 
             new$colormodel <- colormodel
         if (!missing(useDingbats)) 
             new$useDingbats <- useDingbats
         if (!missing(useKerning)) 
             new$useKerning <- useKerning
         if (!missing(fillOddEven)) 
             new$fillOddEven <- fillOddEven
         if (!missing(compress)) 
             new$compress <- compress
         old <- check.options(new, name.opt = ".PDF.Options", envir = .PSenv)
         if (!missing(family) && (inherits(family, "Type1Font") || inherits(family, "CIDFont"))) {
             enc <- family$encoding
             if (inherits(family, "Type1Font") && !is.null(enc) && enc != "default" && 
                 (is.null(old$encoding) || old$encoding == "default")) 
                 old$encoding <- enc
             family <- family$metrics
         }
         if (is.null(old$encoding) || old$encoding == "default") 
             old$encoding <- guessEncoding()
         if (!missing(family)) {
             if (length(family) == 4L) {
                 family <- c(family, "Symbol.afm")
             }
             else if (length(family) == 5L) {
             }
             else if (length(family) == 1L) {
                 pf <- pdfFonts(family)[[1L]]
                 if (is.null(pf)) 
                     stop(gettextf("unknown family '%s'", family), domain = NA)
                 matchFont(pf, old$encoding)
             }
             else stop("invalid 'family' argument")
             old$family <- family
         }
         version <- old$version
         versions <- c("1.1", "1.2", "1.3", "1.4", "1.5", "1.6", "1.7", "2.0")
         if (version %in% versions) 
             version <- as.integer(strsplit(version, "[.]")[[1L]])
         else stop("invalid PDF version")
         onefile <- old$onefile
         if (!checkIntFormat(file)) 
             stop(gettextf("invalid 'file' argument '%s'", file), domain = NA)
         .External(C_PDF, file, old$paper, old$family, old$encoding, old$bg, old$fg, old$width, 
             old$height, old$pointsize, onefile, old$pagecentre, old$title, old$fonts, 
             version[1L], version[2L], old$colormodel, old$useDingbats, old$useKerning, 
             old$fillOddEven, old$compress)
         invisible()
     })()
  
  ── 2. Error: Basic (@test-pvar.R#10)  ──────────────────────────────────────────
  cannot open file 'Rplots.pdf'
  1: expect_that(plot(PV), is_null()) at /home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/pvar/tests/test-pvar.R:10
  2: condition(object)
  3: expect_null(x)
  4: quasi_label(enquo(object), label)
  5: eval_bare(get_expr(quo), get_env(quo))
  6: plot(PV)
  7: plot.pvar(PV)
  8: plot(Time, x$x, type = "l", sub = sub, ylab = ylab, main = main, ...)
  9: plot.default(Time, x$x, type = "l", sub = sub, ylab = ylab, main = main, ...)
  10: dev.hold()
  11: (function (file = if (onefile) "Rplots.pdf" else "Rplot%03d.pdf", width, height, 
         onefile, family, title, fonts, version, paper, encoding, bg, fg, pointsize, pagecentre, 
         colormodel, useDingbats, useKerning, fillOddEven, compress) 
     {
         initPSandPDFfonts()
         new <- list()
         if (!missing(width)) 
             new$width <- width
         if (!missing(height)) 
             new$height <- height
         if (!missing(onefile)) 
             new$onefile <- onefile
         if (!missing(title)) 
             new$title <- title
         if (!missing(fonts)) 
             new$fonts <- fonts
         if (!missing(version)) 
             new$version <- version
         if (!missing(paper)) 
             new$paper <- paper
         if (!missing(encoding)) 
             new$encoding <- encoding
         if (!missing(bg)) 
             new$bg <- bg
         if (!missing(fg)) 
             new$fg <- fg
         if (!missing(pointsize)) 
             new$pointsize <- pointsize
         if (!missing(pagecentre)) 
             new$pagecentre <- pagecentre
         if (!missing(colormodel)) 
             new$colormodel <- colormodel
         if (!missing(useDingbats)) 
             new$useDingbats <- useDingbats
         if (!missing(useKerning)) 
             new$useKerning <- useKerning
         if (!missing(fillOddEven)) 
             new$fillOddEven <- fillOddEven
         if (!missing(compress)) 
             new$compress <- compress
         old <- check.options(new, name.opt = ".PDF.Options", envir = .PSenv)
         if (!missing(family) && (inherits(family, "Type1Font") || inherits(family, "CIDFont"))) {
             enc <- family$encoding
             if (inherits(family, "Type1Font") && !is.null(enc) && enc != "default" && 
                 (is.null(old$encoding) || old$encoding == "default")) 
                 old$encoding <- enc
             family <- family$metrics
         }
         if (is.null(old$encoding) || old$encoding == "default") 
             old$encoding <- guessEncoding()
         if (!missing(family)) {
             if (length(family) == 4L) {
                 family <- c(family, "Symbol.afm")
             }
             else if (length(family) == 5L) {
             }
             else if (length(family) == 1L) {
                 pf <- pdfFonts(family)[[1L]]
                 if (is.null(pf)) 
                     stop(gettextf("unknown family '%s'", family), domain = NA)
                 matchFont(pf, old$encoding)
             }
             else stop("invalid 'family' argument")
             old$family <- family
         }
         version <- old$version
         versions <- c("1.1", "1.2", "1.3", "1.4", "1.5", "1.6", "1.7", "2.0")
         if (version %in% versions) 
             version <- as.integer(strsplit(version, "[.]")[[1L]])
         else stop("invalid PDF version")
         onefile <- old$onefile
         if (!checkIntFormat(file)) 
             stop(gettextf("invalid 'file' argument '%s'", file), domain = NA)
         .External(C_PDF, file, old$paper, old$family, old$encoding, old$bg, old$fg, old$width, 
             old$height, old$pointsize, onefile, old$pagecentre, old$title, old$fonts, 
             version[1L], version[2L], old$colormodel, old$useDingbats, old$useKerning, 
             old$fillOddEven, old$compress)
         invisible()
     })()
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 317 SKIPPED: 0 FAILED: 2
  1. Error: Basic (@test-PvarBreakTest.R#8) 
  2. Error: Basic (@test-pvar.R#10) 
  
  Error: testthat unit tests failed
  In addition: Warning message:
  Placing tests in `inst/tests` is deprecated. Please use `tests/testthat` instead 
  Execution halted