R Under development (unstable) (2024-08-16 r87026 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2024 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
> # * https://testthat.r-lib.org/articles/special-files.html
> 
> library(testthat)
> library(qtkit)
> library(httptest)
> library(chromote)
> 
> # Function to delete Crashpad directories
> cleanup_crashpad <- function() {
+   crashpad_dirs <- dir(tempdir(), full.names = TRUE, pattern = "Crashpad")
+   if (length(crashpad_dirs) > 0) {
+     unlink(crashpad_dirs, recursive = TRUE)
+   }
+ }
> 
> testthat::setup(cleanup_crashpad)
> testthat::teardown(cleanup_crashpad)
> 
> # Function to check if Chromium is
> # available and can be initialized
> is_chromium_available <- function() {
+   tryCatch({
+     chromote::Chromote$new()
+     TRUE
+   }, error = function(e) {
+     FALSE
+   })
+ }
> 
> # Set the timeout for chromote (Windows only issue)
> # https://github.com/rstudio/chromote/issues/114#issuecomment-1675406196
> options(chromote.timeout = 60)
> 
> test_check("qtkit")
Are you aware of the permissions to use this data?
Are you aware of the permissions to use this data?
Please review the documentation and try again.

Attaching package: 'dplyr'

The following object is masked from 'package:testthat':

    matches

The following objects are masked from 'package:stats':

    filter, lag

The following objects are masked from 'package:base':

    intersect, setdiff, setequal, union

Variable name: x
Q1: 2.25 Q3: 4.75 IQR: 2.5
Upper fence: 8.5 Lower fence: -1.5
Number of outliers: 1
Variable name: x
Q1: 2 Q3: 4 IQR: 2
Upper fence: 7 Lower fence: -1
Number of outliers: 0
Creating target data directory 

Downloading data... 

trying URL 'https://raw.githubusercontent.com/qtalr/qtkit/main/inst/extdata/test_data.zip'
Content type 'application/zip' length 1966 bytes
==================================================
downloaded 1966 bytes

Data downloaded! 

Data already exists 

Creating target data directory 

Downloading data... 

trying URL 'https://raw.githubusercontent.com/qtalr/qtkit/main/inst/extdata/test_data.zip'
Content type 'application/zip' length 1966 bytes
==================================================
downloaded 1966 bytes

Data downloaded! 

Saving 7 x 7 in image
Saving 7 x 7 in image
Saving 7 x 7 in image
Saving 7 x 7 in image
Saving 7 x 7 in image
Saving 7 x 7 in image
Directory created: D:\temp\RtmpAhkp7L/new_dir
Saving 7 x 7 in image
Saving 7 x 7 in image
Saving 7 x 7 in image

Attaching package: 'kableExtra'

The following object is masked from 'package:dplyr':

    group_rows

Google Chrome was not found. Try setting the `CHROMOTE_CHROME` environment variable to the executable of a Chromium-based browser, such as Google Chrome, Chromium or Brave.
Directory created: D:\temp\RtmpAhkp7L/non_existent_dir
[ FAIL 0 | WARN 0 | SKIP 2 | PASS 70 ]

══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• Chromium not available (1): 'test-write_kbl.R:11:3'
• On CRAN (1): 'test-get_gutenberg_data.R:5:3'

[ FAIL 0 | WARN 0 | SKIP 2 | PASS 70 ]
> 
> proc.time()
   user  system elapsed 
   4.76    0.70    5.65