Provides comprehensive uncertainty quantification methods for spatial predictions including epistemic, aleatoric, and total uncertainty calculation, confidence interval generation, and uncertainty visualization capabilities.
Details
The SpatialUncertainty class provides:
Multiple uncertainty types (epistemic, aleatoric, total)
Confidence interval generation with various methods
Spatial uncertainty mapping and visualization
Uncertainty calibration and validation metrics
Public fields
uncertainty_resultsStored uncertainty calculation results
visualization_configConfiguration for uncertainty visualizations
calibration_metricsUncertainty calibration assessment results
Active bindings
uncertainty_resultsStored uncertainty calculation results
visualization_configConfiguration for uncertainty visualizations
calibration_metricsUncertainty calibration assessment results
Methods
Method new()
Usage
SpatialUncertainty$new(config = list())Method calculate_uncertainties()
Usage
SpatialUncertainty$calculate_uncertainties(
predictions,
method = "bdl",
uncertainty_types = c("epistemic", "aleatoric", "total")
)Method generate_confidence_intervals()
Usage
SpatialUncertainty$generate_confidence_intervals(
predictions,
confidence_level = 0.95,
method = "normal"
)Method create_uncertainty_maps()
Usage
SpatialUncertainty$create_uncertainty_maps(
uncertainty_results,
field_data,
map_types = c("epistemic", "aleatoric", "total"),
resolution = NULL
)Method visualize_uncertainty()
Usage
SpatialUncertainty$visualize_uncertainty(
uncertainty_results,
plot_type = "all",
interactive = FALSE
)Method assess_calibration()
Usage
SpatialUncertainty$assess_calibration(
predictions,
observations,
calibration_method = "reliability_diagram"
)Method calculate_coverage_probability()
Usage
SpatialUncertainty$calculate_coverage_probability(
predictions,
observations,
confidence_level = 0.95
)Examples
if (FALSE) { # \dontrun{
# Initialize uncertainty quantification
uncertainty <- SpatialUncertainty$new()
# Calculate uncertainties from BDL predictions
uncertainties <- uncertainty$calculate_uncertainties(bdl_predictions)
# Generate confidence intervals
intervals <- uncertainty$generate_confidence_intervals(predictions, level = 0.95)
# Create uncertainty maps
maps <- uncertainty$create_uncertainty_maps(uncertainties, field_data)
} # }
## ------------------------------------------------
## Method `SpatialUncertainty$new`
## ------------------------------------------------
if (FALSE) { # \dontrun{
uncertainty <- SpatialUncertainty$new()
} # }
## ------------------------------------------------
## Method `SpatialUncertainty$calculate_uncertainties`
## ------------------------------------------------
if (FALSE) { # \dontrun{
uncertainties <- uncertainty$calculate_uncertainties(
predictions = bdl_result,
method = "bdl",
uncertainty_types = c("epistemic", "aleatoric", "total")
)
} # }
## ------------------------------------------------
## Method `SpatialUncertainty$generate_confidence_intervals`
## ------------------------------------------------
if (FALSE) { # \dontrun{
intervals <- uncertainty$generate_confidence_intervals(
predictions = predictions,
confidence_level = 0.95,
method = "normal"
)
} # }
## ------------------------------------------------
## Method `SpatialUncertainty$create_uncertainty_maps`
## ------------------------------------------------
if (FALSE) { # \dontrun{
maps <- uncertainty$create_uncertainty_maps(
uncertainty_results = uncertainties,
field_data = field_data,
map_types = c("epistemic", "total")
)
} # }
## ------------------------------------------------
## Method `SpatialUncertainty$visualize_uncertainty`
## ------------------------------------------------
if (FALSE) { # \dontrun{
plots <- uncertainty$visualize_uncertainty(
uncertainty_results = uncertainties,
plot_type = "all",
interactive = TRUE
)
} # }
## ------------------------------------------------
## Method `SpatialUncertainty$assess_calibration`
## ------------------------------------------------
if (FALSE) { # \dontrun{
calibration <- uncertainty$assess_calibration(
predictions = predictions,
observations = true_values,
calibration_method = "reliability_diagram"
)
} # }
## ------------------------------------------------
## Method `SpatialUncertainty$calculate_coverage_probability`
## ------------------------------------------------
if (FALSE) { # \dontrun{
coverage <- uncertainty$calculate_coverage_probability(
predictions = predictions_with_ci,
observations = true_values,
confidence_level = 0.95
)
} # }
