tests/testthat/test-shiny-getters.R
In vegawidget/vegawidget: 'Htmlwidget' for 'Vega' and 'Vega-Lite'
test_that("get_unique_inputId() works", {
expect_identical(get_unique_inputId("foo", c("bar", "baz")), "foo")
expect_identical(get_unique_inputId("foo", c("foo", "bar", "baz")), "foo_1")
})
vegawidget/vegawidget documentation built on Jan. 27, 2024, 10:48 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("get_unique_inputId() works", {
expect_identical(get_unique_inputId("foo", c("bar", "baz")), "foo")
expect_identical(get_unique_inputId("foo", c("foo", "bar", "baz")), "foo_1")
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.