Last updated on 2025-02-07 08:51:59 CET.
| Package | ERROR | OK |
|---|---|---|
| teal | 9 | 4 |
| teal.code | 13 | |
| teal.data | 13 | |
| teal.logger | 13 | |
| teal.modules.general | 9 | 4 |
| teal.reporter | 13 | |
| teal.slice | 13 | |
| teal.transform | 13 | |
| teal.widgets | 13 |
Current CRAN status: ERROR: 9, OK: 4
Version: 0.15.2
Check: Rd cross-references
Result: NOTE
Found the following Rd file(s) with Rd \link{} targets missing package
anchors:
TealReportCard.Rd: ReportCard
init.Rd: teal_data
module_teal_with_splash.Rd: teal_data
Please provide package anchors for all Rd \link{} targets not in the
package itself and the base packages.
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-windows-x86_64
Version: 0.15.2
Check: examples
Result: ERROR
Running examples in ‘teal-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: example_module
> ### Title: An example 'teal' module
> ### Aliases: example_module
>
> ### ** Examples
>
> app <- init(
+ data = teal_data(IRIS = iris, MTCARS = mtcars),
+ modules = example_module()
+ )
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-patched-linux-x86_64, r-release-linux-x86_64
Version: 0.15.2
Check: tests
Result: ERROR
Running ‘testthat.R’ [23s/28s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> pkg_name <- "teal"
> library(pkg_name, character.only = TRUE)
Loading required package: shiny
Loading required package: teal.data
Loading required package: teal.code
Loading required package: teal.slice
Registered S3 method overwritten by 'teal':
method from
c.teal_slices teal.slice
You are using teal version 0.15.2
Attaching package: 'teal'
The following objects are masked from 'package:teal.slice':
as.teal_slices, teal_slices
> testthat::test_check(pkg_name)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-init.R:3:3'): init data accepts teal_data object ─────────────
Expected `init(data = teal.data::teal_data(iris = iris), modules = modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:24:3'): init modules accepts a teal_modules object ────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:29:3'): init modules accepts a list of teal_module elements ──
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:34:3'): init modules accepts a teal_module object ─────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:42:3'): init filter accepts `teal_slices` ─────────────
Expected `init(...)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:53:3'): init throws when an empty `data` is used ──────
`init(data = teal.data::teal_data(), modules = list(example_module()))` threw an error with unexpected message.
Expected match: "The environment of `data` is empty."
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:53:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(), modules = list(example_module()))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Failure ('test-init.R:61:3'): init throws when datanames in modules incompatible w/ datanames in data ──
`init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))` threw an error with unexpected message.
Expected match: "Module 'example teal module' uses datanames not available in 'data'"
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:61:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-init.R:71:3'): init throws when dataname in filter incompatible w/ datanames in data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test-init.R:71:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(...)
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-module_nested_tabs.R:4:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_nested_tabs.R:4:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_tabs_with_filters.R:5:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_tabs_with_filters.R:5:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_teal.R:30:7'): srv_teal when teal_data_rv changes, datasets_reactive is initialized as list of FilteredData ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:18:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─checkmate::expect_list(datasets_reactive(), types = "FilteredData") at test-module_teal.R:30:7
27. │ └─checkmate::checkList(...)
28. │ └─... %and% checkListTypes(x, types)
29. │ └─base::isTRUE(lhs)
30. ├─shiny (local) datasets_reactive()
31. │ ├─shiny::..stacktraceoff..(self$.updateValue())
32. │ └─self$.updateValue()
33. │ └─ctx$run(...)
34. │ ├─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ ├─shiny::withReactiveDomain(...)
37. │ │ └─promises::with_promise_domain(...)
38. │ │ └─domain$wrapSync(expr)
39. │ │ └─base::force(expr)
40. │ ├─shiny::captureStackTraces(...)
41. │ │ └─promises::with_promise_domain(...)
42. │ │ └─domain$wrapSync(expr)
43. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
44. │ └─env$runWith(self, func)
45. │ └─shiny (local) contextFunc()
46. │ ├─base::withCallingHandlers(...)
47. │ ├─base::withVisible(.func())
48. │ └─shiny (local) .func()
49. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
50. │ └─shiny:::hybrid_chain(...)
51. │ └─shiny (local) do()
52. │ └─base::tryCatch(...)
53. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
54. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
55. │ └─value[[3L]](cond)
56. │ └─base::stop(e)
57. ├─shiny (local) `<fn>`(`<smplErrr>`)
58. │ └─base::stop(e)
59. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:49:7'): srv_teal initialized datasets_reactive (list) reflects modules structure ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:37:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─testthat::expect_named(datasets_reactive(), c("iris_tab", "tab")) at test-module_teal.R:49:7
27. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
28. │ └─rlang::eval_bare(expr, quo_get_env(quo))
29. ├─shiny (local) datasets_reactive()
30. │ ├─shiny::..stacktraceoff..(self$.updateValue())
31. │ └─self$.updateValue()
32. │ └─ctx$run(...)
33. │ ├─promises::with_promise_domain(...)
34. │ │ └─domain$wrapSync(expr)
35. │ ├─shiny::withReactiveDomain(...)
36. │ │ └─promises::with_promise_domain(...)
37. │ │ └─domain$wrapSync(expr)
38. │ │ └─base::force(expr)
39. │ ├─shiny::captureStackTraces(...)
40. │ │ └─promises::with_promise_domain(...)
41. │ │ └─domain$wrapSync(expr)
42. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
43. │ └─env$runWith(self, func)
44. │ └─shiny (local) contextFunc()
45. │ ├─base::withCallingHandlers(...)
46. │ ├─base::withVisible(.func())
47. │ └─shiny (local) .func()
48. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
49. │ └─shiny:::hybrid_chain(...)
50. │ └─shiny (local) do()
51. │ └─base::tryCatch(...)
52. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
53. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
54. │ └─value[[3L]](cond)
55. │ └─base::stop(e)
56. ├─shiny (local) `<fn>`(`<smplErrr>`)
57. │ └─base::stop(e)
58. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:70:7'): srv_teal initialized data containing same FilteredData when the filter is global ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:70:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:92:7'): srv_teal initialized data containing different FilteredData when the filter is module_specific ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:79:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:92:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-utils.R:45:3'): teal_data_to_filtered_data return FilteredData class ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─testthat::expect_s3_class(...) at test-utils.R:45:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─teal:::teal_data_to_filtered_data(teal_data)
5. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
6. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:64:3'): teal_data_datanames returns datanames which are set by teal.data::datanames ──
teal_data_datanames(teal_data) not equal to "iris".
Lengths differ: 2 is not 1
── Error ('test-utils.R:103:3'): modules_datasets returns correct structure ────
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─base::rapply(...) at test-utils.R:103:3
2. └─teal:::modules_datasets(data, modules, filters)
3. ├─checkmate::assert_r6(filtered_data_singleton, "FilteredData")
4. │ └─checkmate::checkR6(...)
5. └─teal:::teal_data_to_filtered_data(data)
6. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
8. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:164:3'): create_app_id: 'data' accepts teal_data or teal_data_module ──
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-utils.R:179:3'): create_app_id: 'modules' accepts modules ────
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Error ('test-utils.R:188:3'): create_app_id returns a character string ──────
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─checkmate::expect_string(...) at test-utils.R:188:3
2. │ └─checkmate::checkString(...)
3. │ └─... %and% ...
4. │ └─base::isTRUE(lhs)
5. └─teal:::create_app_id(teal.data::teal_data(), modules(example_module()))
6. └─base::as.list(data@env)
── Error ('test-utils.R:192:3'): create_app_id returns different hash for different data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:192:3
2. └─base::as.list(data@env)
── Error ('test-utils.R:198:3'): create_app_id returns different hash for different modules ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:198:3
2. └─base::as.list(data@env)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang
Version: 0.15.2
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
...
--- re-building ‘adding-support-for-reporting.Rmd’ using rmarkdown
Quitting from lines 106-112 [unnamed-chunk-4] (adding-support-for-reporting.Rmd)
Error: processing vignette 'adding-support-for-reporting.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘adding-support-for-reporting.Rmd’
--- re-building ‘bootstrap-themes-in-teal.Rmd’ using rmarkdown
--- finished re-building ‘bootstrap-themes-in-teal.Rmd’
--- re-building ‘creating-custom-modules.Rmd’ using rmarkdown
Quitting from lines 174-183 [unnamed-chunk-4] (creating-custom-modules.Rmd)
Error: processing vignette 'creating-custom-modules.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘creating-custom-modules.Rmd’
--- re-building ‘data-as-shiny-module.Rmd’ using rmarkdown
--- finished re-building ‘data-as-shiny-module.Rmd’
--- re-building ‘filter-panel.Rmd’ using rmarkdown
--- finished re-building ‘filter-panel.Rmd’
--- re-building ‘getting-started-with-teal.Rmd’ using rmarkdown
Quitting from lines 33-52 [unnamed-chunk-1] (getting-started-with-teal.Rmd)
Error: processing vignette 'getting-started-with-teal.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘getting-started-with-teal.Rmd’
--- re-building ‘including-data-in-teal-applications.Rmd’ using rmarkdown
--- finished re-building ‘including-data-in-teal-applications.Rmd’
--- re-building ‘teal-options.Rmd’ using rmarkdown
--- finished re-building ‘teal-options.Rmd’
SUMMARY: processing the following files failed:
‘adding-support-for-reporting.Rmd’ ‘creating-custom-modules.Rmd’
‘getting-started-with-teal.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-patched-linux-x86_64, r-release-linux-x86_64
Version: 0.15.2
Check: tests
Result: ERROR
Running ‘testthat.R’ [15s/17s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> pkg_name <- "teal"
> library(pkg_name, character.only = TRUE)
Loading required package: shiny
Loading required package: teal.data
Loading required package: teal.code
Loading required package: teal.slice
Registered S3 method overwritten by 'teal':
method from
c.teal_slices teal.slice
You are using teal version 0.15.2
Attaching package: 'teal'
The following objects are masked from 'package:teal.slice':
as.teal_slices, teal_slices
> testthat::test_check(pkg_name)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-init.R:3:3'): init data accepts teal_data object ─────────────
Expected `init(data = teal.data::teal_data(iris = iris), modules = modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:24:3'): init modules accepts a teal_modules object ────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:29:3'): init modules accepts a list of teal_module elements ──
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:34:3'): init modules accepts a teal_module object ─────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:42:3'): init filter accepts `teal_slices` ─────────────
Expected `init(...)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:53:3'): init throws when an empty `data` is used ──────
`init(data = teal.data::teal_data(), modules = list(example_module()))` threw an error with unexpected message.
Expected match: "The environment of `data` is empty."
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:53:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(), modules = list(example_module()))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Failure ('test-init.R:61:3'): init throws when datanames in modules incompatible w/ datanames in data ──
`init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))` threw an error with unexpected message.
Expected match: "Module 'example teal module' uses datanames not available in 'data'"
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:61:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-init.R:71:3'): init throws when dataname in filter incompatible w/ datanames in data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test-init.R:71:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(...)
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-module_nested_tabs.R:4:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_nested_tabs.R:4:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_tabs_with_filters.R:5:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_tabs_with_filters.R:5:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_teal.R:30:7'): srv_teal when teal_data_rv changes, datasets_reactive is initialized as list of FilteredData ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:18:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─checkmate::expect_list(datasets_reactive(), types = "FilteredData") at test-module_teal.R:30:7
27. │ └─checkmate::checkList(...)
28. │ └─... %and% checkListTypes(x, types)
29. │ └─base::isTRUE(lhs)
30. ├─shiny (local) datasets_reactive()
31. │ ├─shiny::..stacktraceoff..(self$.updateValue())
32. │ └─self$.updateValue()
33. │ └─ctx$run(...)
34. │ ├─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ ├─shiny::withReactiveDomain(...)
37. │ │ └─promises::with_promise_domain(...)
38. │ │ └─domain$wrapSync(expr)
39. │ │ └─base::force(expr)
40. │ ├─shiny::captureStackTraces(...)
41. │ │ └─promises::with_promise_domain(...)
42. │ │ └─domain$wrapSync(expr)
43. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
44. │ └─env$runWith(self, func)
45. │ └─shiny (local) contextFunc()
46. │ ├─base::withCallingHandlers(...)
47. │ ├─base::withVisible(.func())
48. │ └─shiny (local) .func()
49. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
50. │ └─shiny:::hybrid_chain(...)
51. │ └─shiny (local) do()
52. │ └─base::tryCatch(...)
53. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
54. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
55. │ └─value[[3L]](cond)
56. │ └─base::stop(e)
57. ├─shiny (local) `<fn>`(`<smplErrr>`)
58. │ └─base::stop(e)
59. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:49:7'): srv_teal initialized datasets_reactive (list) reflects modules structure ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:37:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─testthat::expect_named(datasets_reactive(), c("iris_tab", "tab")) at test-module_teal.R:49:7
27. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
28. │ └─rlang::eval_bare(expr, quo_get_env(quo))
29. ├─shiny (local) datasets_reactive()
30. │ ├─shiny::..stacktraceoff..(self$.updateValue())
31. │ └─self$.updateValue()
32. │ └─ctx$run(...)
33. │ ├─promises::with_promise_domain(...)
34. │ │ └─domain$wrapSync(expr)
35. │ ├─shiny::withReactiveDomain(...)
36. │ │ └─promises::with_promise_domain(...)
37. │ │ └─domain$wrapSync(expr)
38. │ │ └─base::force(expr)
39. │ ├─shiny::captureStackTraces(...)
40. │ │ └─promises::with_promise_domain(...)
41. │ │ └─domain$wrapSync(expr)
42. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
43. │ └─env$runWith(self, func)
44. │ └─shiny (local) contextFunc()
45. │ ├─base::withCallingHandlers(...)
46. │ ├─base::withVisible(.func())
47. │ └─shiny (local) .func()
48. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
49. │ └─shiny:::hybrid_chain(...)
50. │ └─shiny (local) do()
51. │ └─base::tryCatch(...)
52. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
53. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
54. │ └─value[[3L]](cond)
55. │ └─base::stop(e)
56. ├─shiny (local) `<fn>`(`<smplErrr>`)
57. │ └─base::stop(e)
58. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:70:7'): srv_teal initialized data containing same FilteredData when the filter is global ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:70:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:92:7'): srv_teal initialized data containing different FilteredData when the filter is module_specific ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:79:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:92:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-utils.R:45:3'): teal_data_to_filtered_data return FilteredData class ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─testthat::expect_s3_class(...) at test-utils.R:45:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─teal:::teal_data_to_filtered_data(teal_data)
5. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
6. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:64:3'): teal_data_datanames returns datanames which are set by teal.data::datanames ──
teal_data_datanames(teal_data) not equal to "iris".
Lengths differ: 2 is not 1
── Error ('test-utils.R:103:3'): modules_datasets returns correct structure ────
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─base::rapply(...) at test-utils.R:103:3
2. └─teal:::modules_datasets(data, modules, filters)
3. ├─checkmate::assert_r6(filtered_data_singleton, "FilteredData")
4. │ └─checkmate::checkR6(...)
5. └─teal:::teal_data_to_filtered_data(data)
6. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
8. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:164:3'): create_app_id: 'data' accepts teal_data or teal_data_module ──
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-utils.R:179:3'): create_app_id: 'modules' accepts modules ────
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Error ('test-utils.R:188:3'): create_app_id returns a character string ──────
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─checkmate::expect_string(...) at test-utils.R:188:3
2. │ └─checkmate::checkString(...)
3. │ └─... %and% ...
4. │ └─base::isTRUE(lhs)
5. └─teal:::create_app_id(teal.data::teal_data(), modules(example_module()))
6. └─base::as.list(data@env)
── Error ('test-utils.R:192:3'): create_app_id returns different hash for different data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:192:3
2. └─base::as.list(data@env)
── Error ('test-utils.R:198:3'): create_app_id returns different hash for different modules ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:198:3
2. └─base::as.list(data@env)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.15.2
Check: examples
Result: ERROR
Running examples in ‘teal-Ex.R’ failed
The error most likely occurred in:
> ### Name: example_module
> ### Title: An example 'teal' module
> ### Aliases: example_module
>
> ### ** Examples
>
> app <- init(
+ data = teal_data(IRIS = iris, MTCARS = mtcars),
+ modules = example_module()
+ )
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64, r-release-windows-x86_64, r-oldrel-windows-x86_64
Version: 0.15.2
Check: tests
Result: ERROR
Running ‘testthat.R’ [36s/46s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> pkg_name <- "teal"
> library(pkg_name, character.only = TRUE)
Loading required package: shiny
Loading required package: teal.data
Loading required package: teal.code
Loading required package: teal.slice
Registered S3 method overwritten by 'teal':
method from
c.teal_slices teal.slice
You are using teal version 0.15.2
Attaching package: 'teal'
The following objects are masked from 'package:teal.slice':
as.teal_slices, teal_slices
> testthat::test_check(pkg_name)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-init.R:3:3'): init data accepts teal_data object ─────────────
Expected `init(data = teal.data::teal_data(iris = iris), modules = modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:24:3'): init modules accepts a teal_modules object ────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:29:3'): init modules accepts a list of teal_module elements ──
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:34:3'): init modules accepts a teal_module object ─────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:42:3'): init filter accepts `teal_slices` ─────────────
Expected `init(...)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:53:3'): init throws when an empty `data` is used ──────
`init(data = teal.data::teal_data(), modules = list(example_module()))` threw an error with unexpected message.
Expected match: "The environment of `data` is empty."
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:53:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(), modules = list(example_module()))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Failure ('test-init.R:61:3'): init throws when datanames in modules incompatible w/ datanames in data ──
`init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))` threw an error with unexpected message.
Expected match: "Module 'example teal module' uses datanames not available in 'data'"
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:61:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-init.R:71:3'): init throws when dataname in filter incompatible w/ datanames in data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test-init.R:71:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(...)
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-module_nested_tabs.R:4:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_nested_tabs.R:4:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_tabs_with_filters.R:5:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_tabs_with_filters.R:5:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_teal.R:30:7'): srv_teal when teal_data_rv changes, datasets_reactive is initialized as list of FilteredData ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:18:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─checkmate::expect_list(datasets_reactive(), types = "FilteredData") at test-module_teal.R:30:7
27. │ └─checkmate::checkList(...)
28. │ └─... %and% checkListTypes(x, types)
29. │ └─base::isTRUE(lhs)
30. ├─shiny (local) datasets_reactive()
31. │ ├─shiny::..stacktraceoff..(self$.updateValue())
32. │ └─self$.updateValue()
33. │ └─ctx$run(...)
34. │ ├─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ ├─shiny::withReactiveDomain(...)
37. │ │ └─promises::with_promise_domain(...)
38. │ │ └─domain$wrapSync(expr)
39. │ │ └─base::force(expr)
40. │ ├─shiny::captureStackTraces(...)
41. │ │ └─promises::with_promise_domain(...)
42. │ │ └─domain$wrapSync(expr)
43. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
44. │ └─env$runWith(self, func)
45. │ └─shiny (local) contextFunc()
46. │ ├─base::withCallingHandlers(...)
47. │ ├─base::withVisible(.func())
48. │ └─shiny (local) .func()
49. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
50. │ └─shiny:::hybrid_chain(...)
51. │ └─shiny (local) do()
52. │ └─base::tryCatch(...)
53. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
54. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
55. │ └─value[[3L]](cond)
56. │ └─base::stop(e)
57. ├─shiny (local) `<fn>`(`<smplErrr>`)
58. │ └─base::stop(e)
59. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:49:7'): srv_teal initialized datasets_reactive (list) reflects modules structure ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:37:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─testthat::expect_named(datasets_reactive(), c("iris_tab", "tab")) at test-module_teal.R:49:7
27. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
28. │ └─rlang::eval_bare(expr, quo_get_env(quo))
29. ├─shiny (local) datasets_reactive()
30. │ ├─shiny::..stacktraceoff..(self$.updateValue())
31. │ └─self$.updateValue()
32. │ └─ctx$run(...)
33. │ ├─promises::with_promise_domain(...)
34. │ │ └─domain$wrapSync(expr)
35. │ ├─shiny::withReactiveDomain(...)
36. │ │ └─promises::with_promise_domain(...)
37. │ │ └─domain$wrapSync(expr)
38. │ │ └─base::force(expr)
39. │ ├─shiny::captureStackTraces(...)
40. │ │ └─promises::with_promise_domain(...)
41. │ │ └─domain$wrapSync(expr)
42. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
43. │ └─env$runWith(self, func)
44. │ └─shiny (local) contextFunc()
45. │ ├─base::withCallingHandlers(...)
46. │ ├─base::withVisible(.func())
47. │ └─shiny (local) .func()
48. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
49. │ └─shiny:::hybrid_chain(...)
50. │ └─shiny (local) do()
51. │ └─base::tryCatch(...)
52. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
53. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
54. │ └─value[[3L]](cond)
55. │ └─base::stop(e)
56. ├─shiny (local) `<fn>`(`<smplErrr>`)
57. │ └─base::stop(e)
58. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:70:7'): srv_teal initialized data containing same FilteredData when the filter is global ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:70:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:92:7'): srv_teal initialized data containing different FilteredData when the filter is module_specific ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:79:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:92:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-utils.R:45:3'): teal_data_to_filtered_data return FilteredData class ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─testthat::expect_s3_class(...) at test-utils.R:45:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─teal:::teal_data_to_filtered_data(teal_data)
5. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
6. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:64:3'): teal_data_datanames returns datanames which are set by teal.data::datanames ──
teal_data_datanames(teal_data) not equal to "iris".
Lengths differ: 2 is not 1
── Error ('test-utils.R:103:3'): modules_datasets returns correct structure ────
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─base::rapply(...) at test-utils.R:103:3
2. └─teal:::modules_datasets(data, modules, filters)
3. ├─checkmate::assert_r6(filtered_data_singleton, "FilteredData")
4. │ └─checkmate::checkR6(...)
5. └─teal:::teal_data_to_filtered_data(data)
6. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
8. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:164:3'): create_app_id: 'data' accepts teal_data or teal_data_module ──
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-utils.R:179:3'): create_app_id: 'modules' accepts modules ────
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Error ('test-utils.R:188:3'): create_app_id returns a character string ──────
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─checkmate::expect_string(...) at test-utils.R:188:3
2. │ └─checkmate::checkString(...)
3. │ └─... %and% ...
4. │ └─base::isTRUE(lhs)
5. └─teal:::create_app_id(teal.data::teal_data(), modules(example_module()))
6. └─base::as.list(data@env)
── Error ('test-utils.R:192:3'): create_app_id returns different hash for different data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:192:3
2. └─base::as.list(data@env)
── Error ('test-utils.R:198:3'): create_app_id returns different hash for different modules ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:198:3
2. └─base::as.list(data@env)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.15.2
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
--- re-building ‘adding-support-for-reporting.Rmd’ using rmarkdown
Quitting from lines 106-112 [unnamed-chunk-4] (adding-support-for-reporting.Rmd)
Error: processing vignette 'adding-support-for-reporting.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘adding-support-for-reporting.Rmd’
--- re-building ‘bootstrap-themes-in-teal.Rmd’ using rmarkdown
--- finished re-building ‘bootstrap-themes-in-teal.Rmd’
--- re-building ‘creating-custom-modules.Rmd’ using rmarkdown
Quitting from lines 174-183 [unnamed-chunk-4] (creating-custom-modules.Rmd)
Error: processing vignette 'creating-custom-modules.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘creating-custom-modules.Rmd’
--- re-building ‘data-as-shiny-module.Rmd’ using rmarkdown
--- finished re-building ‘data-as-shiny-module.Rmd’
--- re-building ‘filter-panel.Rmd’ using rmarkdown
--- finished re-building ‘filter-panel.Rmd’
--- re-building ‘getting-started-with-teal.Rmd’ using rmarkdown
Quitting from lines 33-52 [unnamed-chunk-1] (getting-started-with-teal.Rmd)
Error: processing vignette 'getting-started-with-teal.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘getting-started-with-teal.Rmd’
--- re-building ‘including-data-in-teal-applications.Rmd’ using rmarkdown
--- finished re-building ‘including-data-in-teal-applications.Rmd’
--- re-building ‘teal-options.Rmd’ using rmarkdown
--- finished re-building ‘teal-options.Rmd’
SUMMARY: processing the following files failed:
‘adding-support-for-reporting.Rmd’ ‘creating-custom-modules.Rmd’
‘getting-started-with-teal.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64, r-release-windows-x86_64, r-oldrel-windows-x86_64
Version: 0.15.2
Check: tests
Result: ERROR
Running ‘testthat.R’ [35s/38s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> pkg_name <- "teal"
> library(pkg_name, character.only = TRUE)
Loading required package: shiny
Loading required package: teal.data
Loading required package: teal.code
Loading required package: teal.slice
Registered S3 method overwritten by 'teal':
method from
c.teal_slices teal.slice
You are using teal version 0.15.2
Attaching package: 'teal'
The following objects are masked from 'package:teal.slice':
as.teal_slices, teal_slices
> testthat::test_check(pkg_name)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-init.R:3:3'): init data accepts teal_data object ─────────────
Expected `init(data = teal.data::teal_data(iris = iris), modules = modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:24:3'): init modules accepts a teal_modules object ────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:29:3'): init modules accepts a list of teal_module elements ──
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:34:3'): init modules accepts a teal_module object ─────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:42:3'): init filter accepts `teal_slices` ─────────────
Expected `init(...)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:53:3'): init throws when an empty `data` is used ──────
`init(data = teal.data::teal_data(), modules = list(example_module()))` threw an error with unexpected message.
Expected match: "The environment of `data` is empty."
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:53:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(), modules = list(example_module()))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Failure ('test-init.R:61:3'): init throws when datanames in modules incompatible w/ datanames in data ──
`init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))` threw an error with unexpected message.
Expected match: "Module 'example teal module' uses datanames not available in 'data'"
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:61:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-init.R:71:3'): init throws when dataname in filter incompatible w/ datanames in data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test-init.R:71:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(...)
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-module_nested_tabs.R:4:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_nested_tabs.R:4:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_tabs_with_filters.R:5:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_tabs_with_filters.R:5:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_teal.R:30:7'): srv_teal when teal_data_rv changes, datasets_reactive is initialized as list of FilteredData ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:18:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─checkmate::expect_list(datasets_reactive(), types = "FilteredData") at test-module_teal.R:30:7
27. │ └─checkmate::checkList(...)
28. │ └─... %and% checkListTypes(x, types)
29. │ └─base::isTRUE(lhs)
30. ├─shiny (local) datasets_reactive()
31. │ ├─shiny::..stacktraceoff..(self$.updateValue())
32. │ └─self$.updateValue()
33. │ └─ctx$run(...)
34. │ ├─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ ├─shiny::withReactiveDomain(...)
37. │ │ └─promises::with_promise_domain(...)
38. │ │ └─domain$wrapSync(expr)
39. │ │ └─base::force(expr)
40. │ ├─shiny::captureStackTraces(...)
41. │ │ └─promises::with_promise_domain(...)
42. │ │ └─domain$wrapSync(expr)
43. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
44. │ └─env$runWith(self, func)
45. │ └─shiny (local) contextFunc()
46. │ ├─base::withCallingHandlers(...)
47. │ ├─base::withVisible(.func())
48. │ └─shiny (local) .func()
49. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
50. │ └─shiny:::hybrid_chain(...)
51. │ └─shiny (local) do()
52. │ └─base::tryCatch(...)
53. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
54. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
55. │ └─value[[3L]](cond)
56. │ └─base::stop(e)
57. ├─shiny (local) `<fn>`(`<smplErrr>`)
58. │ └─base::stop(e)
59. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:49:7'): srv_teal initialized datasets_reactive (list) reflects modules structure ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:37:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─testthat::expect_named(datasets_reactive(), c("iris_tab", "tab")) at test-module_teal.R:49:7
27. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
28. │ └─rlang::eval_bare(expr, quo_get_env(quo))
29. ├─shiny (local) datasets_reactive()
30. │ ├─shiny::..stacktraceoff..(self$.updateValue())
31. │ └─self$.updateValue()
32. │ └─ctx$run(...)
33. │ ├─promises::with_promise_domain(...)
34. │ │ └─domain$wrapSync(expr)
35. │ ├─shiny::withReactiveDomain(...)
36. │ │ └─promises::with_promise_domain(...)
37. │ │ └─domain$wrapSync(expr)
38. │ │ └─base::force(expr)
39. │ ├─shiny::captureStackTraces(...)
40. │ │ └─promises::with_promise_domain(...)
41. │ │ └─domain$wrapSync(expr)
42. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
43. │ └─env$runWith(self, func)
44. │ └─shiny (local) contextFunc()
45. │ ├─base::withCallingHandlers(...)
46. │ ├─base::withVisible(.func())
47. │ └─shiny (local) .func()
48. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
49. │ └─shiny:::hybrid_chain(...)
50. │ └─shiny (local) do()
51. │ └─base::tryCatch(...)
52. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
53. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
54. │ └─value[[3L]](cond)
55. │ └─base::stop(e)
56. ├─shiny (local) `<fn>`(`<smplErrr>`)
57. │ └─base::stop(e)
58. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:70:7'): srv_teal initialized data containing same FilteredData when the filter is global ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:70:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:92:7'): srv_teal initialized data containing different FilteredData when the filter is module_specific ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:79:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:92:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-utils.R:45:3'): teal_data_to_filtered_data return FilteredData class ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─testthat::expect_s3_class(...) at test-utils.R:45:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─teal:::teal_data_to_filtered_data(teal_data)
5. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
6. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:64:3'): teal_data_datanames returns datanames which are set by teal.data::datanames ──
teal_data_datanames(teal_data) not equal to "iris".
Lengths differ: 2 is not 1
── Error ('test-utils.R:103:3'): modules_datasets returns correct structure ────
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─base::rapply(...) at test-utils.R:103:3
2. └─teal:::modules_datasets(data, modules, filters)
3. ├─checkmate::assert_r6(filtered_data_singleton, "FilteredData")
4. │ └─checkmate::checkR6(...)
5. └─teal:::teal_data_to_filtered_data(data)
6. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
8. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:164:3'): create_app_id: 'data' accepts teal_data or teal_data_module ──
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-utils.R:179:3'): create_app_id: 'modules' accepts modules ────
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Error ('test-utils.R:188:3'): create_app_id returns a character string ──────
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─checkmate::expect_string(...) at test-utils.R:188:3
2. │ └─checkmate::checkString(...)
3. │ └─... %and% ...
4. │ └─base::isTRUE(lhs)
5. └─teal:::create_app_id(teal.data::teal_data(), modules(example_module()))
6. └─base::as.list(data@env)
── Error ('test-utils.R:192:3'): create_app_id returns different hash for different data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:192:3
2. └─base::as.list(data@env)
── Error ('test-utils.R:198:3'): create_app_id returns different hash for different modules ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:198:3
2. └─base::as.list(data@env)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 0.15.2
Check: tests
Result: ERROR
Running 'testthat.R' [19s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> pkg_name <- "teal"
> library(pkg_name, character.only = TRUE)
Loading required package: shiny
Loading required package: teal.data
Loading required package: teal.code
Loading required package: teal.slice
Registered S3 method overwritten by 'teal':
method from
c.teal_slices teal.slice
You are using teal version 0.15.2
Attaching package: 'teal'
The following objects are masked from 'package:teal.slice':
as.teal_slices, teal_slices
> testthat::test_check(pkg_name)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-init.R:3:3'): init data accepts teal_data object ─────────────
Expected `init(data = teal.data::teal_data(iris = iris), modules = modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:24:3'): init modules accepts a teal_modules object ────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:29:3'): init modules accepts a list of teal_module elements ──
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:34:3'): init modules accepts a teal_module object ─────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:42:3'): init filter accepts `teal_slices` ─────────────
Expected `init(...)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:53:3'): init throws when an empty `data` is used ──────
`init(data = teal.data::teal_data(), modules = list(example_module()))` threw an error with unexpected message.
Expected match: "The environment of `data` is empty."
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:53:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(), modules = list(example_module()))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Failure ('test-init.R:61:3'): init throws when datanames in modules incompatible w/ datanames in data ──
`init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))` threw an error with unexpected message.
Expected match: "Module 'example teal module' uses datanames not available in 'data'"
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:61:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-init.R:71:3'): init throws when dataname in filter incompatible w/ datanames in data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test-init.R:71:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(...)
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-module_nested_tabs.R:4:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_nested_tabs.R:4:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_tabs_with_filters.R:5:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_tabs_with_filters.R:5:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_teal.R:30:7'): srv_teal when teal_data_rv changes, datasets_reactive is initialized as list of FilteredData ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:18:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─checkmate::expect_list(datasets_reactive(), types = "FilteredData") at test-module_teal.R:30:7
27. │ └─checkmate::checkList(...)
28. │ └─... %and% checkListTypes(x, types)
29. │ └─base::isTRUE(lhs)
30. ├─shiny (local) datasets_reactive()
31. │ ├─shiny::..stacktraceoff..(self$.updateValue())
32. │ └─self$.updateValue()
33. │ └─ctx$run(...)
34. │ ├─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ ├─shiny::withReactiveDomain(...)
37. │ │ └─promises::with_promise_domain(...)
38. │ │ └─domain$wrapSync(expr)
39. │ │ └─base::force(expr)
40. │ ├─shiny::captureStackTraces(...)
41. │ │ └─promises::with_promise_domain(...)
42. │ │ └─domain$wrapSync(expr)
43. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
44. │ └─env$runWith(self, func)
45. │ └─shiny (local) contextFunc()
46. │ ├─base::withCallingHandlers(...)
47. │ ├─base::withVisible(.func())
48. │ └─shiny (local) .func()
49. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
50. │ └─shiny:::hybrid_chain(...)
51. │ └─shiny (local) do()
52. │ └─base::tryCatch(...)
53. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
54. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
55. │ └─value[[3L]](cond)
56. │ └─base::stop(e)
57. ├─shiny (local) `<fn>`(`<smplErrr>`)
58. │ └─base::stop(e)
59. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:49:7'): srv_teal initialized datasets_reactive (list) reflects modules structure ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:37:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─testthat::expect_named(datasets_reactive(), c("iris_tab", "tab")) at test-module_teal.R:49:7
27. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
28. │ └─rlang::eval_bare(expr, quo_get_env(quo))
29. ├─shiny (local) datasets_reactive()
30. │ ├─shiny::..stacktraceoff..(self$.updateValue())
31. │ └─self$.updateValue()
32. │ └─ctx$run(...)
33. │ ├─promises::with_promise_domain(...)
34. │ │ └─domain$wrapSync(expr)
35. │ ├─shiny::withReactiveDomain(...)
36. │ │ └─promises::with_promise_domain(...)
37. │ │ └─domain$wrapSync(expr)
38. │ │ └─base::force(expr)
39. │ ├─shiny::captureStackTraces(...)
40. │ │ └─promises::with_promise_domain(...)
41. │ │ └─domain$wrapSync(expr)
42. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
43. │ └─env$runWith(self, func)
44. │ └─shiny (local) contextFunc()
45. │ ├─base::withCallingHandlers(...)
46. │ ├─base::withVisible(.func())
47. │ └─shiny (local) .func()
48. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
49. │ └─shiny:::hybrid_chain(...)
50. │ └─shiny (local) do()
51. │ └─base::tryCatch(...)
52. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
53. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
54. │ └─value[[3L]](cond)
55. │ └─base::stop(e)
56. ├─shiny (local) `<fn>`(`<smplErrr>`)
57. │ └─base::stop(e)
58. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:70:7'): srv_teal initialized data containing same FilteredData when the filter is global ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:70:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:92:7'): srv_teal initialized data containing different FilteredData when the filter is module_specific ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:79:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:92:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-utils.R:45:3'): teal_data_to_filtered_data return FilteredData class ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─testthat::expect_s3_class(...) at test-utils.R:45:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─teal:::teal_data_to_filtered_data(teal_data)
5. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
6. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:64:3'): teal_data_datanames returns datanames which are set by teal.data::datanames ──
teal_data_datanames(teal_data) not equal to "iris".
Lengths differ: 2 is not 1
── Error ('test-utils.R:103:3'): modules_datasets returns correct structure ────
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─base::rapply(...) at test-utils.R:103:3
2. └─teal:::modules_datasets(data, modules, filters)
3. ├─checkmate::assert_r6(filtered_data_singleton, "FilteredData")
4. │ └─checkmate::checkR6(...)
5. └─teal:::teal_data_to_filtered_data(data)
6. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
8. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:164:3'): create_app_id: 'data' accepts teal_data or teal_data_module ──
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-utils.R:179:3'): create_app_id: 'modules' accepts modules ────
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Error ('test-utils.R:188:3'): create_app_id returns a character string ──────
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─checkmate::expect_string(...) at test-utils.R:188:3
2. │ └─checkmate::checkString(...)
3. │ └─... %and% ...
4. │ └─base::isTRUE(lhs)
5. └─teal:::create_app_id(teal.data::teal_data(), modules(example_module()))
6. └─base::as.list(data@env)
── Error ('test-utils.R:192:3'): create_app_id returns different hash for different data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:192:3
2. └─base::as.list(data@env)
── Error ('test-utils.R:198:3'): create_app_id returns different hash for different modules ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:198:3
2. └─base::as.list(data@env)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
Error: Test failures
Execution halted
Flavors: r-devel-windows-x86_64, r-release-windows-x86_64
Version: 0.15.2
Check: tests
Result: ERROR
Running ‘testthat.R’ [22s/24s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> pkg_name <- "teal"
> library(pkg_name, character.only = TRUE)
Loading required package: shiny
Loading required package: teal.data
Loading required package: teal.code
Loading required package: teal.slice
Registered S3 method overwritten by 'teal':
method from
c.teal_slices teal.slice
You are using teal version 0.15.2
Attaching package: 'teal'
The following objects are masked from 'package:teal.slice':
as.teal_slices, teal_slices
> testthat::test_check(pkg_name)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-init.R:3:3'): init data accepts teal_data object ─────────────
Expected `init(data = teal.data::teal_data(iris = iris), modules = modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:24:3'): init modules accepts a teal_modules object ────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:29:3'): init modules accepts a list of teal_module elements ──
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:34:3'): init modules accepts a teal_module object ─────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:42:3'): init filter accepts `teal_slices` ─────────────
Expected `init(...)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:53:3'): init throws when an empty `data` is used ──────
`init(data = teal.data::teal_data(), modules = list(example_module()))` threw an error with unexpected message.
Expected match: "The environment of `data` is empty."
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:53:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(), modules = list(example_module()))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Failure ('test-init.R:61:3'): init throws when datanames in modules incompatible w/ datanames in data ──
`init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))` threw an error with unexpected message.
Expected match: "Module 'example teal module' uses datanames not available in 'data'"
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:61:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-init.R:71:3'): init throws when dataname in filter incompatible w/ datanames in data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test-init.R:71:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(...)
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-module_nested_tabs.R:4:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_nested_tabs.R:4:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_tabs_with_filters.R:5:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_tabs_with_filters.R:5:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_teal.R:30:7'): srv_teal when teal_data_rv changes, datasets_reactive is initialized as list of FilteredData ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:18:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─checkmate::expect_list(datasets_reactive(), types = "FilteredData") at test-module_teal.R:30:7
27. │ └─checkmate::checkList(...)
28. │ └─... %and% checkListTypes(x, types)
29. │ └─base::isTRUE(lhs)
30. ├─shiny (local) datasets_reactive()
31. │ ├─shiny::..stacktraceoff..(self$.updateValue())
32. │ └─self$.updateValue()
33. │ └─ctx$run(...)
34. │ ├─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ ├─shiny::withReactiveDomain(...)
37. │ │ └─promises::with_promise_domain(...)
38. │ │ └─domain$wrapSync(expr)
39. │ │ └─base::force(expr)
40. │ ├─shiny::captureStackTraces(...)
41. │ │ └─promises::with_promise_domain(...)
42. │ │ └─domain$wrapSync(expr)
43. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
44. │ └─env$runWith(self, func)
45. │ └─shiny (local) contextFunc()
46. │ ├─base::withCallingHandlers(...)
47. │ ├─base::withVisible(.func())
48. │ └─shiny (local) .func()
49. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
50. │ └─shiny:::hybrid_chain(...)
51. │ └─shiny (local) do()
52. │ └─base::tryCatch(...)
53. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
54. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
55. │ └─value[[3L]](cond)
56. │ └─base::stop(e)
57. ├─shiny (local) `<fn>`(`<smplErrr>`)
58. │ └─base::stop(e)
59. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:49:7'): srv_teal initialized datasets_reactive (list) reflects modules structure ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:37:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─testthat::expect_named(datasets_reactive(), c("iris_tab", "tab")) at test-module_teal.R:49:7
27. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
28. │ └─rlang::eval_bare(expr, quo_get_env(quo))
29. ├─shiny (local) datasets_reactive()
30. │ ├─shiny::..stacktraceoff..(self$.updateValue())
31. │ └─self$.updateValue()
32. │ └─ctx$run(...)
33. │ ├─promises::with_promise_domain(...)
34. │ │ └─domain$wrapSync(expr)
35. │ ├─shiny::withReactiveDomain(...)
36. │ │ └─promises::with_promise_domain(...)
37. │ │ └─domain$wrapSync(expr)
38. │ │ └─base::force(expr)
39. │ ├─shiny::captureStackTraces(...)
40. │ │ └─promises::with_promise_domain(...)
41. │ │ └─domain$wrapSync(expr)
42. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
43. │ └─env$runWith(self, func)
44. │ └─shiny (local) contextFunc()
45. │ ├─base::withCallingHandlers(...)
46. │ ├─base::withVisible(.func())
47. │ └─shiny (local) .func()
48. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
49. │ └─shiny:::hybrid_chain(...)
50. │ └─shiny (local) do()
51. │ └─base::tryCatch(...)
52. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
53. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
54. │ └─value[[3L]](cond)
55. │ └─base::stop(e)
56. ├─shiny (local) `<fn>`(`<smplErrr>`)
57. │ └─base::stop(e)
58. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:70:7'): srv_teal initialized data containing same FilteredData when the filter is global ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:70:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:92:7'): srv_teal initialized data containing different FilteredData when the filter is module_specific ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:79:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:92:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-utils.R:45:3'): teal_data_to_filtered_data return FilteredData class ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─testthat::expect_s3_class(...) at test-utils.R:45:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─teal:::teal_data_to_filtered_data(teal_data)
5. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
6. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:64:3'): teal_data_datanames returns datanames which are set by teal.data::datanames ──
teal_data_datanames(teal_data) not equal to "iris".
Lengths differ: 2 is not 1
── Error ('test-utils.R:103:3'): modules_datasets returns correct structure ────
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─base::rapply(...) at test-utils.R:103:3
2. └─teal:::modules_datasets(data, modules, filters)
3. ├─checkmate::assert_r6(filtered_data_singleton, "FilteredData")
4. │ └─checkmate::checkR6(...)
5. └─teal:::teal_data_to_filtered_data(data)
6. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
8. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:164:3'): create_app_id: 'data' accepts teal_data or teal_data_module ──
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-utils.R:179:3'): create_app_id: 'modules' accepts modules ────
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Error ('test-utils.R:188:3'): create_app_id returns a character string ──────
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─checkmate::expect_string(...) at test-utils.R:188:3
2. │ └─checkmate::checkString(...)
3. │ └─... %and% ...
4. │ └─base::isTRUE(lhs)
5. └─teal:::create_app_id(teal.data::teal_data(), modules(example_module()))
6. └─base::as.list(data@env)
── Error ('test-utils.R:192:3'): create_app_id returns different hash for different data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:192:3
2. └─base::as.list(data@env)
── Error ('test-utils.R:198:3'): create_app_id returns different hash for different modules ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:198:3
2. └─base::as.list(data@env)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
Error: Test failures
Execution halted
Flavor: r-patched-linux-x86_64
Version: 0.15.2
Check: tests
Result: ERROR
Running ‘testthat.R’ [22s/26s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> pkg_name <- "teal"
> library(pkg_name, character.only = TRUE)
Loading required package: shiny
Loading required package: teal.data
Loading required package: teal.code
Loading required package: teal.slice
Registered S3 method overwritten by 'teal':
method from
c.teal_slices teal.slice
You are using teal version 0.15.2
Attaching package: 'teal'
The following objects are masked from 'package:teal.slice':
as.teal_slices, teal_slices
> testthat::test_check(pkg_name)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-init.R:3:3'): init data accepts teal_data object ─────────────
Expected `init(data = teal.data::teal_data(iris = iris), modules = modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:24:3'): init modules accepts a teal_modules object ────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:29:3'): init modules accepts a list of teal_module elements ──
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:34:3'): init modules accepts a teal_module object ─────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:42:3'): init filter accepts `teal_slices` ─────────────
Expected `init(...)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:53:3'): init throws when an empty `data` is used ──────
`init(data = teal.data::teal_data(), modules = list(example_module()))` threw an error with unexpected message.
Expected match: "The environment of `data` is empty."
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:53:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(), modules = list(example_module()))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Failure ('test-init.R:61:3'): init throws when datanames in modules incompatible w/ datanames in data ──
`init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))` threw an error with unexpected message.
Expected match: "Module 'example teal module' uses datanames not available in 'data'"
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:61:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-init.R:71:3'): init throws when dataname in filter incompatible w/ datanames in data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test-init.R:71:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(...)
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-module_nested_tabs.R:4:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_nested_tabs.R:4:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_tabs_with_filters.R:5:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_tabs_with_filters.R:5:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_teal.R:30:7'): srv_teal when teal_data_rv changes, datasets_reactive is initialized as list of FilteredData ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:18:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─checkmate::expect_list(datasets_reactive(), types = "FilteredData") at test-module_teal.R:30:7
27. │ └─checkmate::checkList(...)
28. │ └─... %and% checkListTypes(x, types)
29. │ └─base::isTRUE(lhs)
30. ├─shiny (local) datasets_reactive()
31. │ ├─shiny::..stacktraceoff..(self$.updateValue())
32. │ └─self$.updateValue()
33. │ └─ctx$run(...)
34. │ ├─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ ├─shiny::withReactiveDomain(...)
37. │ │ └─promises::with_promise_domain(...)
38. │ │ └─domain$wrapSync(expr)
39. │ │ └─base::force(expr)
40. │ ├─shiny::captureStackTraces(...)
41. │ │ └─promises::with_promise_domain(...)
42. │ │ └─domain$wrapSync(expr)
43. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
44. │ └─env$runWith(self, func)
45. │ └─shiny (local) contextFunc()
46. │ ├─base::withCallingHandlers(...)
47. │ ├─base::withVisible(.func())
48. │ └─shiny (local) .func()
49. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
50. │ └─shiny:::hybrid_chain(...)
51. │ └─shiny (local) do()
52. │ └─base::tryCatch(...)
53. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
54. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
55. │ └─value[[3L]](cond)
56. │ └─base::stop(e)
57. ├─shiny (local) `<fn>`(`<smplErrr>`)
58. │ └─base::stop(e)
59. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:49:7'): srv_teal initialized datasets_reactive (list) reflects modules structure ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:37:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─testthat::expect_named(datasets_reactive(), c("iris_tab", "tab")) at test-module_teal.R:49:7
27. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
28. │ └─rlang::eval_bare(expr, quo_get_env(quo))
29. ├─shiny (local) datasets_reactive()
30. │ ├─shiny::..stacktraceoff..(self$.updateValue())
31. │ └─self$.updateValue()
32. │ └─ctx$run(...)
33. │ ├─promises::with_promise_domain(...)
34. │ │ └─domain$wrapSync(expr)
35. │ ├─shiny::withReactiveDomain(...)
36. │ │ └─promises::with_promise_domain(...)
37. │ │ └─domain$wrapSync(expr)
38. │ │ └─base::force(expr)
39. │ ├─shiny::captureStackTraces(...)
40. │ │ └─promises::with_promise_domain(...)
41. │ │ └─domain$wrapSync(expr)
42. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
43. │ └─env$runWith(self, func)
44. │ └─shiny (local) contextFunc()
45. │ ├─base::withCallingHandlers(...)
46. │ ├─base::withVisible(.func())
47. │ └─shiny (local) .func()
48. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
49. │ └─shiny:::hybrid_chain(...)
50. │ └─shiny (local) do()
51. │ └─base::tryCatch(...)
52. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
53. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
54. │ └─value[[3L]](cond)
55. │ └─base::stop(e)
56. ├─shiny (local) `<fn>`(`<smplErrr>`)
57. │ └─base::stop(e)
58. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:70:7'): srv_teal initialized data containing same FilteredData when the filter is global ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:70:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:92:7'): srv_teal initialized data containing different FilteredData when the filter is module_specific ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:79:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:92:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-utils.R:45:3'): teal_data_to_filtered_data return FilteredData class ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─testthat::expect_s3_class(...) at test-utils.R:45:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─teal:::teal_data_to_filtered_data(teal_data)
5. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
6. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:64:3'): teal_data_datanames returns datanames which are set by teal.data::datanames ──
teal_data_datanames(teal_data) not equal to "iris".
Lengths differ: 2 is not 1
── Error ('test-utils.R:103:3'): modules_datasets returns correct structure ────
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─base::rapply(...) at test-utils.R:103:3
2. └─teal:::modules_datasets(data, modules, filters)
3. ├─checkmate::assert_r6(filtered_data_singleton, "FilteredData")
4. │ └─checkmate::checkR6(...)
5. └─teal:::teal_data_to_filtered_data(data)
6. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
8. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:164:3'): create_app_id: 'data' accepts teal_data or teal_data_module ──
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-utils.R:179:3'): create_app_id: 'modules' accepts modules ────
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Error ('test-utils.R:188:3'): create_app_id returns a character string ──────
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─checkmate::expect_string(...) at test-utils.R:188:3
2. │ └─checkmate::checkString(...)
3. │ └─... %and% ...
4. │ └─base::isTRUE(lhs)
5. └─teal:::create_app_id(teal.data::teal_data(), modules(example_module()))
6. └─base::as.list(data@env)
── Error ('test-utils.R:192:3'): create_app_id returns different hash for different data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:192:3
2. └─base::as.list(data@env)
── Error ('test-utils.R:198:3'): create_app_id returns different hash for different modules ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:198:3
2. └─base::as.list(data@env)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
Error: Test failures
Execution halted
Flavor: r-release-linux-x86_64
Version: 0.15.2
Check: tests
Result: ERROR
Running 'testthat.R' [28s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> pkg_name <- "teal"
> library(pkg_name, character.only = TRUE)
Loading required package: shiny
Loading required package: teal.data
Loading required package: teal.code
Loading required package: teal.slice
Registered S3 method overwritten by 'teal':
method from
c.teal_slices teal.slice
You are using teal version 0.15.2
Attaching package: 'teal'
The following objects are masked from 'package:teal.slice':
as.teal_slices, teal_slices
> testthat::test_check(pkg_name)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-init.R:3:3'): init data accepts teal_data object ─────────────
Expected `init(data = teal.data::teal_data(iris = iris), modules = modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:24:3'): init modules accepts a teal_modules object ────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:29:3'): init modules accepts a list of teal_module elements ──
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:34:3'): init modules accepts a teal_module object ─────
Expected `init(data = teal.data::teal_data(iris = iris), modules = mods)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:42:3'): init filter accepts `teal_slices` ─────────────
Expected `init(...)` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-init.R:53:3'): init throws when an empty `data` is used ──────
`init(data = teal.data::teal_data(), modules = list(example_module()))` threw an error with unexpected message.
Expected match: "The environment of `data` is empty."
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:53:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(), modules = list(example_module()))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Failure ('test-init.R:61:3'): init throws when datanames in modules incompatible w/ datanames in data ──
`init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))` threw an error with unexpected message.
Expected match: "Module 'example teal module' uses datanames not available in 'data'"
Actual message: "no slot of name \"env\" for this object of class \"teal_data\""
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-init.R:61:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(data = teal.data::teal_data(mtcars = mtcars), modules = list(example_module(datanames = "iris")))
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-init.R:71:3'): init throws when dataname in filter incompatible w/ datanames in data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test-init.R:71:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─teal::init(...)
7. └─teal:::create_app_id(data, modules)
8. └─base::as.list(data@env)
── Error ('test-module_nested_tabs.R:4:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_nested_tabs.R:4:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_tabs_with_filters.R:5:1'): (code run outside of `test_that()`) ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. └─teal:::teal_data_to_filtered_data(teal_data) at test-module_tabs_with_filters.R:5:1
2. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
3. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
4. └─teal.data (local) .local(object, deparse, names, ...)
── Error ('test-module_teal.R:30:7'): srv_teal when teal_data_rv changes, datasets_reactive is initialized as list of FilteredData ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:18:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─checkmate::expect_list(datasets_reactive(), types = "FilteredData") at test-module_teal.R:30:7
27. │ └─checkmate::checkList(...)
28. │ └─... %and% checkListTypes(x, types)
29. │ └─base::isTRUE(lhs)
30. ├─shiny (local) datasets_reactive()
31. │ ├─shiny::..stacktraceoff..(self$.updateValue())
32. │ └─self$.updateValue()
33. │ └─ctx$run(...)
34. │ ├─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ ├─shiny::withReactiveDomain(...)
37. │ │ └─promises::with_promise_domain(...)
38. │ │ └─domain$wrapSync(expr)
39. │ │ └─base::force(expr)
40. │ ├─shiny::captureStackTraces(...)
41. │ │ └─promises::with_promise_domain(...)
42. │ │ └─domain$wrapSync(expr)
43. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
44. │ └─env$runWith(self, func)
45. │ └─shiny (local) contextFunc()
46. │ ├─base::withCallingHandlers(...)
47. │ ├─base::withVisible(.func())
48. │ └─shiny (local) .func()
49. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
50. │ └─shiny:::hybrid_chain(...)
51. │ └─shiny (local) do()
52. │ └─base::tryCatch(...)
53. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
54. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
55. │ └─value[[3L]](cond)
56. │ └─base::stop(e)
57. ├─shiny (local) `<fn>`(`<smplErrr>`)
58. │ └─base::stop(e)
59. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:49:7'): srv_teal initialized datasets_reactive (list) reflects modules structure ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:37:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─testthat::expect_named(datasets_reactive(), c("iris_tab", "tab")) at test-module_teal.R:49:7
27. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
28. │ └─rlang::eval_bare(expr, quo_get_env(quo))
29. ├─shiny (local) datasets_reactive()
30. │ ├─shiny::..stacktraceoff..(self$.updateValue())
31. │ └─self$.updateValue()
32. │ └─ctx$run(...)
33. │ ├─promises::with_promise_domain(...)
34. │ │ └─domain$wrapSync(expr)
35. │ ├─shiny::withReactiveDomain(...)
36. │ │ └─promises::with_promise_domain(...)
37. │ │ └─domain$wrapSync(expr)
38. │ │ └─base::force(expr)
39. │ ├─shiny::captureStackTraces(...)
40. │ │ └─promises::with_promise_domain(...)
41. │ │ └─domain$wrapSync(expr)
42. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
43. │ └─env$runWith(self, func)
44. │ └─shiny (local) contextFunc()
45. │ ├─base::withCallingHandlers(...)
46. │ ├─base::withVisible(.func())
47. │ └─shiny (local) .func()
48. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
49. │ └─shiny:::hybrid_chain(...)
50. │ └─shiny (local) do()
51. │ └─base::tryCatch(...)
52. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
53. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
54. │ └─value[[3L]](cond)
55. │ └─base::stop(e)
56. ├─shiny (local) `<fn>`(`<smplErrr>`)
57. │ └─base::stop(e)
58. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:70:7'): srv_teal initialized data containing same FilteredData when the filter is global ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:70:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-module_teal.R:92:7'): srv_teal initialized data containing different FilteredData when the filter is module_specific ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─shiny::testServer(...) at test-module_teal.R:79:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny::captureStackTraces(...)
13. │ │ │ │ └─promises::with_promise_domain(...)
14. │ │ │ │ └─domain$wrapSync(expr)
15. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
16. │ │ │ └─env$runWith(self, func)
17. │ │ │ └─shiny (local) contextFunc()
18. │ │ │ └─shiny::..stacktraceon..(expr)
19. │ │ ├─shiny::withReactiveDomain(...)
20. │ │ │ └─promises::with_promise_domain(...)
21. │ │ │ └─domain$wrapSync(expr)
22. │ │ │ └─base::force(expr)
23. │ │ └─withr::with_options(...)
24. │ │ └─base::force(code)
25. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
26. ├─base::unlist(datasets_reactive(), use.names = FALSE) at test-module_teal.R:92:7
27. ├─shiny (local) datasets_reactive()
28. │ ├─shiny::..stacktraceoff..(self$.updateValue())
29. │ └─self$.updateValue()
30. │ └─ctx$run(...)
31. │ ├─promises::with_promise_domain(...)
32. │ │ └─domain$wrapSync(expr)
33. │ ├─shiny::withReactiveDomain(...)
34. │ │ └─promises::with_promise_domain(...)
35. │ │ └─domain$wrapSync(expr)
36. │ │ └─base::force(expr)
37. │ ├─shiny::captureStackTraces(...)
38. │ │ └─promises::with_promise_domain(...)
39. │ │ └─domain$wrapSync(expr)
40. │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
41. │ └─env$runWith(self, func)
42. │ └─shiny (local) contextFunc()
43. │ ├─base::withCallingHandlers(...)
44. │ ├─base::withVisible(.func())
45. │ └─shiny (local) .func()
46. │ └─shiny (local) `<reactive:eventReactive(teal_data_rv())>`(...)
47. │ └─shiny:::hybrid_chain(...)
48. │ └─shiny (local) do()
49. │ └─base::tryCatch(...)
50. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
51. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
52. │ └─value[[3L]](cond)
53. │ └─base::stop(e)
54. ├─shiny (local) `<fn>`(`<smplErrr>`)
55. │ └─base::stop(e)
56. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-utils.R:45:3'): teal_data_to_filtered_data return FilteredData class ──
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─testthat::expect_s3_class(...) at test-utils.R:45:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─teal:::teal_data_to_filtered_data(teal_data)
5. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
6. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:64:3'): teal_data_datanames returns datanames which are set by teal.data::datanames ──
teal_data_datanames(teal_data) not equal to "iris".
Lengths differ: 2 is not 1
── Error ('test-utils.R:103:3'): modules_datasets returns correct structure ────
Error in `.local(object, deparse, names, ...)`: 'names' shouldn't be specified with deprecated 'datanames' parameter.
Backtrace:
▆
1. ├─base::rapply(...) at test-utils.R:103:3
2. └─teal:::modules_datasets(data, modules, filters)
3. ├─checkmate::assert_r6(filtered_data_singleton, "FilteredData")
4. │ └─checkmate::checkR6(...)
5. └─teal:::teal_data_to_filtered_data(data)
6. ├─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
7. └─teal.data::get_code(x, datanames = datanames, check_names = FALSE)
8. └─teal.data (local) .local(object, deparse, names, ...)
── Failure ('test-utils.R:164:3'): create_app_id: 'data' accepts teal_data or teal_data_module ──
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Failure ('test-utils.R:179:3'): create_app_id: 'modules' accepts modules ────
Expected `create_app_id(teal.data::teal_data(), modules(example_module()))` to run without any errors.
ℹ Actually got a <simpleError> with text:
no slot of name "env" for this object of class "teal_data"
── Error ('test-utils.R:188:3'): create_app_id returns a character string ──────
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. ├─checkmate::expect_string(...) at test-utils.R:188:3
2. │ └─checkmate::checkString(...)
3. │ └─... %and% ...
4. │ └─base::isTRUE(lhs)
5. └─teal:::create_app_id(teal.data::teal_data(), modules(example_module()))
6. └─base::as.list(data@env)
── Error ('test-utils.R:192:3'): create_app_id returns different hash for different data ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:192:3
2. └─base::as.list(data@env)
── Error ('test-utils.R:198:3'): create_app_id returns different hash for different modules ──
Error in `as.list(data@env)`: no slot of name "env" for this object of class "teal_data"
Backtrace:
▆
1. └─teal:::create_app_id(teal.data::teal_data(i = iris), modules(example_module())) at test-utils.R:198:3
2. └─base::as.list(data@env)
[ FAIL 22 | WARN 3 | SKIP 0 | PASS 355 ]
Error: Test failures
Execution halted
Flavor: r-oldrel-windows-x86_64
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: ERROR: 9, OK: 4
Version: 0.3.0
Check: examples
Result: ERROR
Running examples in ‘teal.modules.general-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: tm_a_pca
> ### Title: 'teal' module: Principal component analysis
> ### Aliases: tm_a_pca
>
> ### ** Examples
>
> library(teal.widgets)
>
> # general data example
> data <- teal_data()
> data <- within(data, {
+ require(nestcolor)
+ USArrests <- USArrests
+ })
>
> datanames(data) <- "USArrests"
Warning: `datanames<-()` was deprecated in teal.data 0.7.0.
ℹ invalid to use `datanames()<-` or `names()<-` on an object of class
`teal_data`. See ?names.teal_data
>
> app <- init(
+ data = data,
+ modules = modules(
+ tm_a_pca(
+ "PCA",
+ dat = data_extract_spec(
+ dataname = "USArrests",
+ select = select_spec(
+ choices = variable_choices(
+ data = data[["USArrests"]], c("Murder", "Assault", "UrbanPop", "Rape")
+ ),
+ selected = c("Murder", "Assault"),
+ multiple = TRUE
+ ),
+ filter = NULL
+ ),
+ ggplot2_args = ggplot2_args(
+ labs = list(subtitle = "Plot generated by PCA Module")
+ )
+ )
+ )
+ )
[INFO] 2025-02-07 06:40:25.8754 pid:2282648 token:[] teal.modules.general Initializing tm_a_pca
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang
Version: 0.3.0
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
...
--- re-building ‘teal-modules-general.Rmd’ using rmarkdown
Quitting from lines 43-70 [unnamed-chunk-1] (teal-modules-general.Rmd)
Error: processing vignette 'teal-modules-general.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘teal-modules-general.Rmd’
--- re-building ‘using-association-plot.Rmd’ using rmarkdown
Quitting from lines 61-294 [unnamed-chunk-3] (using-association-plot.Rmd)
Error: processing vignette 'using-association-plot.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-association-plot.Rmd’
--- re-building ‘using-bivariate-plot.Rmd’ using rmarkdown
Quitting from lines 66-618 [unnamed-chunk-3] (using-bivariate-plot.Rmd)
Error: processing vignette 'using-bivariate-plot.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-bivariate-plot.Rmd’
--- re-building ‘using-cross-table.Rmd’ using rmarkdown
Quitting from lines 60-135 [unnamed-chunk-3] (using-cross-table.Rmd)
Error: processing vignette 'using-cross-table.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-cross-table.Rmd’
--- re-building ‘using-data-table.Rmd’ using rmarkdown
Quitting from lines 56-106 [unnamed-chunk-3] (using-data-table.Rmd)
Error: processing vignette 'using-data-table.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-data-table.Rmd’
--- re-building ‘using-outliers-module.Rmd’ using rmarkdown
Quitting from lines 57-188 [unnamed-chunk-3] (using-outliers-module.Rmd)
Error: processing vignette 'using-outliers-module.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-outliers-module.Rmd’
--- re-building ‘using-regression-plots.Rmd’ using rmarkdown
Quitting from lines 66-266 [unnamed-chunk-3] (using-regression-plots.Rmd)
Error: processing vignette 'using-regression-plots.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-regression-plots.Rmd’
--- re-building ‘using-response-plot.Rmd’ using rmarkdown
Quitting from lines 65-375 [unnamed-chunk-3] (using-response-plot.Rmd)
Error: processing vignette 'using-response-plot.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-response-plot.Rmd’
--- re-building ‘using-scatterplot-matrix.Rmd’ using rmarkdown
Quitting from lines 66-153 [unnamed-chunk-3] (using-scatterplot-matrix.Rmd)
Error: processing vignette 'using-scatterplot-matrix.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-scatterplot-matrix.Rmd’
--- re-building ‘using-scatterplot.Rmd’ using rmarkdown
Quitting from lines 72-373 [unnamed-chunk-4] (using-scatterplot.Rmd)
Error: processing vignette 'using-scatterplot.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-scatterplot.Rmd’
SUMMARY: processing the following files failed:
‘teal-modules-general.Rmd’ ‘using-association-plot.Rmd’
‘using-bivariate-plot.Rmd’ ‘using-cross-table.Rmd’
‘using-data-table.Rmd’ ‘using-outliers-module.Rmd’
‘using-regression-plots.Rmd’ ‘using-response-plot.Rmd’
‘using-scatterplot-matrix.Rmd’ ‘using-scatterplot.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-patched-linux-x86_64, r-release-linux-x86_64
Version: 0.3.0
Check: examples
Result: ERROR
Running examples in ‘teal.modules.general-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: tm_a_pca
> ### Title: 'teal' module: Principal component analysis
> ### Aliases: tm_a_pca
>
> ### ** Examples
>
> library(teal.widgets)
>
> # general data example
> data <- teal_data()
> data <- within(data, {
+ require(nestcolor)
+ USArrests <- USArrests
+ })
>
> datanames(data) <- "USArrests"
Warning: `datanames<-()` was deprecated in teal.data 0.7.0.
ℹ invalid to use `datanames()<-` or `names()<-` on an object of class
`teal_data`. See ?names.teal_data
>
> app <- init(
+ data = data,
+ modules = modules(
+ tm_a_pca(
+ "PCA",
+ dat = data_extract_spec(
+ dataname = "USArrests",
+ select = select_spec(
+ choices = variable_choices(
+ data = data[["USArrests"]], c("Murder", "Assault", "UrbanPop", "Rape")
+ ),
+ selected = c("Murder", "Assault"),
+ multiple = TRUE
+ ),
+ filter = NULL
+ ),
+ ggplot2_args = ggplot2_args(
+ labs = list(subtitle = "Plot generated by PCA Module")
+ )
+ )
+ )
+ )
[INFO] 2025-02-06 18:06:33.7552 pid:1901964 token:[] teal.modules.general Initializing tm_a_pca
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.3.0
Check: examples
Result: ERROR
Running examples in ‘teal.modules.general-Ex.R’ failed
The error most likely occurred in:
> ### Name: tm_a_pca
> ### Title: 'teal' module: Principal component analysis
> ### Aliases: tm_a_pca
>
> ### ** Examples
>
> library(teal.widgets)
>
> # general data example
> data <- teal_data()
> data <- within(data, {
+ require(nestcolor)
+ USArrests <- USArrests
+ })
>
> datanames(data) <- "USArrests"
Warning: `datanames<-()` was deprecated in teal.data 0.7.0.
ℹ invalid to use `datanames()<-` or `names()<-` on an object of class
`teal_data`. See ?names.teal_data
>
> app <- init(
+ data = data,
+ modules = modules(
+ tm_a_pca(
+ "PCA",
+ dat = data_extract_spec(
+ dataname = "USArrests",
+ select = select_spec(
+ choices = variable_choices(
+ data = data[["USArrests"]], c("Murder", "Assault", "UrbanPop", "Rape")
+ ),
+ selected = c("Murder", "Assault"),
+ multiple = TRUE
+ ),
+ filter = NULL
+ ),
+ ggplot2_args = ggplot2_args(
+ labs = list(subtitle = "Plot generated by PCA Module")
+ )
+ )
+ )
+ )
[INFO] 2025-02-04 19:40:06.8050 pid:2510168 token:[] teal.modules.general Initializing tm_a_pca
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.3.0
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
--- re-building ‘teal-modules-general.Rmd’ using rmarkdown
Quitting from lines 43-70 [unnamed-chunk-1] (teal-modules-general.Rmd)
Error: processing vignette 'teal-modules-general.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘teal-modules-general.Rmd’
--- re-building ‘using-association-plot.Rmd’ using rmarkdown
Quitting from lines 61-294 [unnamed-chunk-3] (using-association-plot.Rmd)
Error: processing vignette 'using-association-plot.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-association-plot.Rmd’
--- re-building ‘using-bivariate-plot.Rmd’ using rmarkdown
Quitting from lines 66-618 [unnamed-chunk-3] (using-bivariate-plot.Rmd)
Error: processing vignette 'using-bivariate-plot.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-bivariate-plot.Rmd’
--- re-building ‘using-cross-table.Rmd’ using rmarkdown
Quitting from lines 60-135 [unnamed-chunk-3] (using-cross-table.Rmd)
Error: processing vignette 'using-cross-table.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-cross-table.Rmd’
--- re-building ‘using-data-table.Rmd’ using rmarkdown
Quitting from lines 56-106 [unnamed-chunk-3] (using-data-table.Rmd)
Error: processing vignette 'using-data-table.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-data-table.Rmd’
--- re-building ‘using-outliers-module.Rmd’ using rmarkdown
Quitting from lines 57-188 [unnamed-chunk-3] (using-outliers-module.Rmd)
Error: processing vignette 'using-outliers-module.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-outliers-module.Rmd’
--- re-building ‘using-regression-plots.Rmd’ using rmarkdown
Quitting from lines 66-266 [unnamed-chunk-3] (using-regression-plots.Rmd)
Error: processing vignette 'using-regression-plots.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-regression-plots.Rmd’
--- re-building ‘using-response-plot.Rmd’ using rmarkdown
Quitting from lines 65-375 [unnamed-chunk-3] (using-response-plot.Rmd)
Error: processing vignette 'using-response-plot.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-response-plot.Rmd’
--- re-building ‘using-scatterplot-matrix.Rmd’ using rmarkdown
Quitting from lines 66-153 [unnamed-chunk-3] (using-scatterplot-matrix.Rmd)
Error: processing vignette 'using-scatterplot-matrix.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-scatterplot-matrix.Rmd’
--- re-building ‘using-scatterplot.Rmd’ using rmarkdown
Quitting from lines 72-373 [unnamed-chunk-4] (using-scatterplot.Rmd)
Error: processing vignette 'using-scatterplot.Rmd' failed with diagnostics:
no slot of name "env" for this object of class "teal_data"
--- failed re-building ‘using-scatterplot.Rmd’
SUMMARY: processing the following files failed:
‘teal-modules-general.Rmd’ ‘using-association-plot.Rmd’
‘using-bivariate-plot.Rmd’ ‘using-cross-table.Rmd’
‘using-data-table.Rmd’ ‘using-outliers-module.Rmd’
‘using-regression-plots.Rmd’ ‘using-response-plot.Rmd’
‘using-scatterplot-matrix.Rmd’ ‘using-scatterplot.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64, r-release-windows-x86_64, r-oldrel-windows-x86_64
Version: 0.3.0
Check: examples
Result: ERROR
Running examples in ‘teal.modules.general-Ex.R’ failed
The error most likely occurred in:
> ### Name: tm_a_pca
> ### Title: 'teal' module: Principal component analysis
> ### Aliases: tm_a_pca
>
> ### ** Examples
>
> library(teal.widgets)
>
> # general data example
> data <- teal_data()
> data <- within(data, {
+ require(nestcolor)
+ USArrests <- USArrests
+ })
>
> datanames(data) <- "USArrests"
Warning: `datanames<-()` was deprecated in teal.data 0.7.0.
ℹ invalid to use `datanames()<-` or `names()<-` on an object of class
`teal_data`. See ?names.teal_data
>
> app <- init(
+ data = data,
+ modules = modules(
+ tm_a_pca(
+ "PCA",
+ dat = data_extract_spec(
+ dataname = "USArrests",
+ select = select_spec(
+ choices = variable_choices(
+ data = data[["USArrests"]], c("Murder", "Assault", "UrbanPop", "Rape")
+ ),
+ selected = c("Murder", "Assault"),
+ multiple = TRUE
+ ),
+ filter = NULL
+ ),
+ ggplot2_args = ggplot2_args(
+ labs = list(subtitle = "Plot generated by PCA Module")
+ )
+ )
+ )
+ )
[INFO] 2025-02-04 21:49:48.9292 pid:3208922 token:[] teal.modules.general Initializing tm_a_pca
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 0.3.0
Check: examples
Result: ERROR
Running examples in 'teal.modules.general-Ex.R' failed
The error most likely occurred in:
> ### Name: tm_a_pca
> ### Title: 'teal' module: Principal component analysis
> ### Aliases: tm_a_pca
>
> ### ** Examples
>
> library(teal.widgets)
>
> # general data example
> data <- teal_data()
> data <- within(data, {
+ require(nestcolor)
+ USArrests <- USArrests
+ })
>
> datanames(data) <- "USArrests"
Warning: `datanames<-()` was deprecated in teal.data 0.7.0.
ℹ invalid to use `datanames()<-` or `names()<-` on an object of class
`teal_data`. See ?names.teal_data
>
> app <- init(
+ data = data,
+ modules = modules(
+ tm_a_pca(
+ "PCA",
+ dat = data_extract_spec(
+ dataname = "USArrests",
+ select = select_spec(
+ choices = variable_choices(
+ data = data[["USArrests"]], c("Murder", "Assault", "UrbanPop", "Rape")
+ ),
+ selected = c("Murder", "Assault"),
+ multiple = TRUE
+ ),
+ filter = NULL
+ ),
+ ggplot2_args = ggplot2_args(
+ labs = list(subtitle = "Plot generated by PCA Module")
+ )
+ )
+ )
+ )
[INFO] 2025-02-03 08:33:30.1887 pid:202572 token:[] teal.modules.general Initializing tm_a_pca
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavor: r-devel-windows-x86_64
Version: 0.3.0
Check: examples
Result: ERROR
Running examples in ‘teal.modules.general-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: tm_a_pca
> ### Title: 'teal' module: Principal component analysis
> ### Aliases: tm_a_pca
>
> ### ** Examples
>
> library(teal.widgets)
>
> # general data example
> data <- teal_data()
> data <- within(data, {
+ require(nestcolor)
+ USArrests <- USArrests
+ })
>
> datanames(data) <- "USArrests"
Warning: `datanames<-()` was deprecated in teal.data 0.7.0.
ℹ invalid to use `datanames()<-` or `names()<-` on an object of class
`teal_data`. See ?names.teal_data
>
> app <- init(
+ data = data,
+ modules = modules(
+ tm_a_pca(
+ "PCA",
+ dat = data_extract_spec(
+ dataname = "USArrests",
+ select = select_spec(
+ choices = variable_choices(
+ data = data[["USArrests"]], c("Murder", "Assault", "UrbanPop", "Rape")
+ ),
+ selected = c("Murder", "Assault"),
+ multiple = TRUE
+ ),
+ filter = NULL
+ ),
+ ggplot2_args = ggplot2_args(
+ labs = list(subtitle = "Plot generated by PCA Module")
+ )
+ )
+ )
+ )
[INFO] 2025-02-05 06:12:52.3824 pid:2866815 token:[] teal.modules.general Initializing tm_a_pca
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavor: r-patched-linux-x86_64
Version: 0.3.0
Check: examples
Result: ERROR
Running examples in ‘teal.modules.general-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: tm_a_pca
> ### Title: 'teal' module: Principal component analysis
> ### Aliases: tm_a_pca
>
> ### ** Examples
>
> library(teal.widgets)
>
> # general data example
> data <- teal_data()
> data <- within(data, {
+ require(nestcolor)
+ USArrests <- USArrests
+ })
>
> datanames(data) <- "USArrests"
Warning: `datanames<-()` was deprecated in teal.data 0.7.0.
ℹ invalid to use `datanames()<-` or `names()<-` on an object of class
`teal_data`. See ?names.teal_data
>
> app <- init(
+ data = data,
+ modules = modules(
+ tm_a_pca(
+ "PCA",
+ dat = data_extract_spec(
+ dataname = "USArrests",
+ select = select_spec(
+ choices = variable_choices(
+ data = data[["USArrests"]], c("Murder", "Assault", "UrbanPop", "Rape")
+ ),
+ selected = c("Murder", "Assault"),
+ multiple = TRUE
+ ),
+ filter = NULL
+ ),
+ ggplot2_args = ggplot2_args(
+ labs = list(subtitle = "Plot generated by PCA Module")
+ )
+ )
+ )
+ )
[INFO] 2025-02-06 06:02:44.2479 pid:2620615 token:[] teal.modules.general Initializing tm_a_pca
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavor: r-release-linux-x86_64
Version: 0.3.0
Check: examples
Result: ERROR
Running examples in 'teal.modules.general-Ex.R' failed
The error most likely occurred in:
> ### Name: tm_a_pca
> ### Title: 'teal' module: Principal component analysis
> ### Aliases: tm_a_pca
>
> ### ** Examples
>
> library(teal.widgets)
>
> # general data example
> data <- teal_data()
> data <- within(data, {
+ require(nestcolor)
+ USArrests <- USArrests
+ })
>
> datanames(data) <- "USArrests"
Warning: `datanames<-()` was deprecated in teal.data 0.7.0.
ℹ invalid to use `datanames()<-` or `names()<-` on an object of class
`teal_data`. See ?names.teal_data
>
> app <- init(
+ data = data,
+ modules = modules(
+ tm_a_pca(
+ "PCA",
+ dat = data_extract_spec(
+ dataname = "USArrests",
+ select = select_spec(
+ choices = variable_choices(
+ data = data[["USArrests"]], c("Murder", "Assault", "UrbanPop", "Rape")
+ ),
+ selected = c("Murder", "Assault"),
+ multiple = TRUE
+ ),
+ filter = NULL
+ ),
+ ggplot2_args = ggplot2_args(
+ labs = list(subtitle = "Plot generated by PCA Module")
+ )
+ )
+ )
+ )
[INFO] 2025-02-06 11:13:09.2166 pid:176476 token:[] teal.modules.general Initializing tm_a_pca
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavor: r-release-windows-x86_64
Version: 0.3.0
Check: examples
Result: ERROR
Running examples in 'teal.modules.general-Ex.R' failed
The error most likely occurred in:
> ### Name: tm_a_pca
> ### Title: 'teal' module: Principal component analysis
> ### Aliases: tm_a_pca
>
> ### ** Examples
>
> library(teal.widgets)
>
> # general data example
> data <- teal_data()
> data <- within(data, {
+ require(nestcolor)
+ USArrests <- USArrests
+ })
>
> datanames(data) <- "USArrests"
Warning: `datanames<-()` was deprecated in teal.data 0.7.0.
ℹ invalid to use `datanames()<-` or `names()<-` on an object of class
`teal_data`. See ?names.teal_data
>
> app <- init(
+ data = data,
+ modules = modules(
+ tm_a_pca(
+ "PCA",
+ dat = data_extract_spec(
+ dataname = "USArrests",
+ select = select_spec(
+ choices = variable_choices(
+ data = data[["USArrests"]], c("Murder", "Assault", "UrbanPop", "Rape")
+ ),
+ selected = c("Murder", "Assault"),
+ multiple = TRUE
+ ),
+ filter = NULL
+ ),
+ ggplot2_args = ggplot2_args(
+ labs = list(subtitle = "Plot generated by PCA Module")
+ )
+ )
+ )
+ )
[INFO] 2025-02-05 09:14:39.5385 pid:43472 token:[] teal.modules.general Initializing tm_a_pca
Error in as.list(data@env) :
no slot of name "env" for this object of class "teal_data"
Calls: init -> create_app_id -> as.list
Execution halted
Flavor: r-oldrel-windows-x86_64
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: OK: 13