tests/testthat/helper_.R

# helper functions needed for tests
# -----
properties_ <- function(deckgl) {
  deckgl$x$layers[[1]]$properties
}

get_layer_props <- function(widget, idx = 1) {
  widget$x$calls[[idx]]$args$properties
}

Try the deckgl package in your browser

Any scripts or data that you put into this service are public.

deckgl documentation built on July 1, 2020, 7:36 p.m.