R/gstatOptions.R

Defines functions set_gstat_progress get_gstat_progress

Documented in get_gstat_progress set_gstat_progress

.gstatOptions <- new.env(FALSE, globalenv())

assign("gstat_progress", TRUE, envir = .gstatOptions)

get_gstat_progress <- function() {
    get("gstat_progress", envir = .gstatOptions)
}

set_gstat_progress <- function(value) {
        stopifnot(is.logical(value))
        stopifnot(length(value) == 1)
        assign("gstat_progress", value, envir = .gstatOptions)
        get_gstat_progress()
}

Try the gstat package in your browser

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

gstat documentation built on April 6, 2023, 5:21 p.m.