Running ‘testthat.R’ [3s/16s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(ubci)
  > 
  > test_check("ubci")
  ── 1. Error: index check 2 (@test-ubci_index.R#17)  ────────────────────────────
  Please install xml2 package
  1: ubci_index_options() at testthat/test-ubci_index.R:17
  2: tar %>% httr::GET() %>% httr::content()
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: withVisible(function_list[[k]](value))
  9: function_list[[k]](value)
  10: httr::content(.)
  11: parse_auto(raw, type, encoding, ...)
  12: parser(x = content, type = type, encoding = encoding, ...)
  13: need_package("xml2")
  14: stop("Please install ", pkg, " package", call. = FALSE)
  
  ── 2. Error: index chk (@test-ubci_index_options.R#4)  ─────────────────────────
  Please install xml2 package
  1: ubci_index_options() at testthat/test-ubci_index_options.R:4
  2: tar %>% httr::GET() %>% httr::content()
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: withVisible(function_list[[k]](value))
  9: function_list[[k]](value)
  10: httr::content(.)
  11: parse_auto(raw, type, encoding, ...)
  12: parser(x = content, type = type, encoding = encoding, ...)
  13: need_package("xml2")
  14: stop("Please install ", pkg, " package", call. = FALSE)
  
  ── 3. Error: index colume chk (@test-ubci_index_options.R#9)  ──────────────────
  Please install xml2 package
  1: ubci_index_options() at testthat/test-ubci_index_options.R:9
  2: tar %>% httr::GET() %>% httr::content()
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: withVisible(function_list[[k]](value))
  9: function_list[[k]](value)
  10: httr::content(.)
  11: parse_auto(raw, type, encoding, ...)
  12: parser(x = content, type = type, encoding = encoding, ...)
  13: need_package("xml2")
  14: stop("Please install ", pkg, " package", call. = FALSE)
  
  ── 4. Error: lang ko chk (@test-ubci_index_options.R#15)  ──────────────────────
  Please install xml2 package
  1: ubci_index_options("ko") at testthat/test-ubci_index_options.R:15
  2: tar %>% httr::GET() %>% httr::content()
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: withVisible(function_list[[k]](value))
  9: function_list[[k]](value)
  10: httr::content(.)
  11: parse_auto(raw, type, encoding, ...)
  12: parser(x = content, type = type, encoding = encoding, ...)
  13: need_package("xml2")
  14: stop("Please install ", pkg, " package", call. = FALSE)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 12 SKIPPED: 0 FAILED: 4
  1. Error: index check 2 (@test-ubci_index.R#17) 
  2. Error: index chk (@test-ubci_index_options.R#4) 
  3. Error: index colume chk (@test-ubci_index_options.R#9) 
  4. Error: lang ko chk (@test-ubci_index_options.R#15) 
  
  Error: testthat unit tests failed
  Execution halted