better name

GeoscienceAustralia · May 18, 2021 · c59be3b · c59be3b
1 parent 4dac411
commit c59be3b
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/ptha_access/get_PTHA_results.R b/ptha_access/get_PTHA_results.R
@@ -1155,7 +1155,7 @@ randomly_sample_scenarios_by_Mw_and_rate<-function(
 #' get standard error). Otherwise, return a data.frame containing that
 #' information for each individual magnitude bin.
 #' 
-get_exrate_uncertainty_at_stage<-function(random_scenarios, event_peak_stage, threshold_stage, 
+estimate_exrate_uncertainty<-function(random_scenarios, event_peak_stage, threshold_stage, 
     importance_sampling_type = 'basic', return_per_Mw_bin=FALSE){ 
 
     unique_Mw = unique(round(random_scenarios$mw, 3))

diff --git a/ptha_access/test_all.R b/ptha_access/test_all.R
@@ -242,7 +242,7 @@ test_random_scenario_sampling<-function(){
     for(rsn in names(random_scenarios)){
         for(ist in importance_sampling_types){
 
-            exrate_uncertainty[[rsn]][[ist]] = ptha18$get_exrate_uncertainty_at_stage(
+            exrate_uncertainty[[rsn]][[ist]] = ptha18$estimate_exrate_uncertainty(
                 random_scenarios[[rsn]], event_peak_stage, threshold_stage, 
                 importance_sampling_type=ist, return_per_Mw_bin=TRUE)
         }