SymbolixAU / mapdeck
1
.onLoad <- function(...){
2

3 0
	if(is.null(getOption("mapdeck"))) {
4

5 0
		options <- list(
6 0
			mapdeck = list(
7 0
				mapbox = NA_character_
8
			)
9
		)
10 0
		attr(options, "class") <- "mapdeck_api"
11 0
		options(mapdeck = options)
12
	}
13
}

Read our documentation on viewing source code .

Loading