Nothing
#' @title Set overwrite and extension parameters
#' @description Internal helper function that sets the overwrite parameter for
#' the ArcPy session and can check out multiple extensions.
#' @param overwrite If set to `TRUE` (default) existing ArcGIS datasets can be
#' overwritten.
#' @param extensions Optional character vector listing ArcGIS extension that
#' should be enabled. This adds to any extensions that are eventually
#' detected by \code{rpygeo_required_extensions}.
#' @note This internal function is used by \code{rpygeo_geoprocessor} and
#' by \code{rpygeo_build_env}.
#' @author Fabian Polakowski and Alexander Brenning
#' @keywords internal
input_check = function (overwrite, extensions) {
# handle overwrite
if (overwrite) {
reticulate::py_run_string("arcpy.env.overwriteOutput = True")
}
# edit 'overwrite' back to FALSE if it was TRUE for a previous function
if (!overwrite) {
reticulate::py_run_string("arcpy.env.overwriteOutput = False")
}
# handle extensions
if (!is.null(extensions)) {
lapply(extensions, function(x) {
ext <- paste0("arcpy.CheckOutExtension('", x, "')")
reticulate::py_run_string(ext)
})
}
}
#' @title Set workspace
#' @description Set workspace for ArcPy environment
#' @param path Path to the workspace containing your data
#' @author Fabian Polakowski
#' @keywords internal
set_workspace = function (path) {
e <- paste0("arcpy.env.workspace = '", path, "'" )
reticulate::py_run_string(e)
}
#' @title Set scratch workspace
#' @description Set scratch workspace for ArcPy environment
#' @param path Path to the scratch workspace
#' @author Fabian Polakowski and Marc Becker
#' @keywords internal
set_scratch_workspace = function (path) {
e <- paste0("arcpy.env.scratchWorkspace = '", path, "'" )
reticulate::py_run_string(e)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.