Running 'testthat.R'
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(r3dmol)
  > 
  > test_check("r3dmol")
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-add.R:1:1): (code run outside of `test_that()`) ─────────────────
  Error: there is no package called 'shiny'
  Backtrace:
       █
    1. ├─testthat::describe(...) test-add.R:1:0
    2. │ └─base::eval(substitute(code), describe_environment)
    3. │   └─base::eval(substitute(code), describe_environment)
    4. │     └─r3dmol() %>% m_add_model(data = pdb_6zsl) test-add.R:2:2
    5. ├─r3dmol::m_add_model(., data = pdb_6zsl)
    6. │ └─r3dmol:::callJS()
    7. └─base::loadNamespace(x)
    8.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
    9.     └─base:::withOneRestart(expr, restarts[[1L]])
   10.       └─base:::doWithOneRestart(return(expr), restart)
  ── Error (test-animation.R:1:1): (code run outside of `test_that()`) ───────────
  Error: there is no package called 'shiny'
  Backtrace:
       █
    1. ├─testthat::describe(...) test-animation.R:1:0
    2. │ └─base::eval(substitute(code), describe_environment)
    3. │   └─base::eval(substitute(code), describe_environment)
    4. │     └─r3dmol() %>% m_add_model(data = pdb_6zsl, format = "pdb") test-animation.R:2:2
    5. ├─r3dmol::m_add_model(., data = pdb_6zsl, format = "pdb")
    6. │ └─r3dmol:::callJS()
    7. └─base::loadNamespace(x)
    8.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
    9.     └─base:::withOneRestart(expr, restarts[[1L]])
   10.       └─base:::doWithOneRestart(return(expr), restart)
  ── Error (test-multi.R:18:5): .m_multi_spec(): error if mismatch in input lengths ──
  Error: there is no package called 'shiny'
  Backtrace:
      █
   1. ├─r3dmol() %>% m_add_model(data = pdb_6zsl) test-multi.R:18:4
   2. ├─r3dmol::m_add_model(., data = pdb_6zsl)
   3. │ └─r3dmol:::callJS()
   4. └─base::loadNamespace(x)
   5.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   6.     └─base:::withOneRestart(expr, restarts[[1L]])
   7.       └─base:::doWithOneRestart(return(expr), restart)
  
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 135 ]
  Error: Test failures
  Execution halted