1
storage_env <- new.env(hash = TRUE)
2

3
.onAttach <- function(libname, pkgname) {
4 1
  shiny::registerInputHandler("sigmajsParseJS", function(data, ...) {
5 0
    jsonlite::fromJSON(jsonlite::toJSON(data, auto_unbox = TRUE))
6 1
  }, force = TRUE)
7
}
8

9
.onLoad <- function(libname, pkgname) {
10 0
  shiny::registerInputHandler("sigmajsParseJS", function(data, ...) {
11 0
    jsonlite::fromJSON(jsonlite::toJSON(data, auto_unbox = TRUE))
12 0
  }, force = TRUE)
13
}

Read our documentation on viewing source code .

Loading