R/databricks-helpers.R

In brickster: R Toolkit for 'Databricks'

on_databricks <- function() {
  dbr <- Sys.getenv("DATABRICKS_RUNTIME_VERSION")
  dbr != ""
}

#' Determine brickster virtualenv
#'
#' @details Returns `NULL` when running within Databricks,
#' otherwise `"r-brickster"`
#'
#' @keywords internal
determine_brickster_venv <- function() {
  if (on_databricks()) {
    NULL
  } else {
    "r-brickster"
  }
}