R/Julia.R

In CUG-hydro/heatwave: What the Package Does (One Line, Title Case)

env <- list2env(list(.julia = FALSE))

julia_setup <- function() {
    JuliaCall::julia_setup()
    # infile <- system.file("cluster/src/cluster.jl", package = "SpatioTemporal.cluster")
    julia_source("R/julia/heat_index.jl")
    # JuliaCall::julia_library("SpatioTemporalCluster")
}

#' @importFrom JuliaCall julia_setup julia_source julia_call
julia_init <- function() {
    if (!env$.julia) {
        env$.julia <- TRUE
        julia_setup()
    }
}