harpVis: Visualisation functions for harp.

# package wide data

harpVis_data <- new.env()

score_colnames <- c(
  "num_cases",
  "mean_bias",
  "stde",
  "rmse",
  "spread",
  "rank_histogram",
  "hexbin",
  "crps",
  "crps_potential",
  "crps_reliability",
  "threshold",
  "fair_brier_score",
  "sample_climatology",
  "bss_ref_climatology",
  "num_cases_total",
  "num_cases_observed",
  "num_cases_forecast",
  "brier_score",
  "brier_skill_score",
  "brier_score_reliability",
  "brier_score_resolution",
  "brier_score_uncertainty",
  "reliability",
  "roc",
  "roc_area",
  "economic_value",
  "member",
  "bias",
  "mae",
  "num_cases_for_threshold_total",
  "num_cases_for_threshold_observed",
  "num_cases_for_threshold_forecast",
  "cont_tab",
  "threat_score",
  "hit_rate",
  "miss_rate",
  "false_alarm_rate",
  "false_alarm_ratio",
  "heidke_skill_score",
  "pierce_skill_score",
  "kuiper_skill_score",
  "percent_correct",
  "frequency_bias",
  "equitable_threat_score",
  "odds_ratio",
  "log_odds_ratio",
  "odds_ratio_skill_score",
  "extreme_dependency_score",
  "symmetric_eds",
  "extreme_dependency_index",
  "symmetric_edi",
  "threat_score_std_error",
  "hit_rate_std_error",
  "false_alarm_rate_std_error",
  "false_alarm_ratio_std_error",
  "heidke_skill_score_std_error",
  "pierce_skill_score_std_error",
  "percent_correct_std_error",
  "equitable_threat_score_std_error",
  "log_odds_ratio_std_error",
  "log_odds_ratio_degrees_of_freedom",
  "odds_ratio_skill_score_std_error",
  "extreme_dependency_score_std_error",
  "symmetric_eds_std_error",
  "extreme_dependency_index_std_error",
  "symmetric_edi_std_error"
)

meta_colnames <- c(
  "mname",
  "leadtime",
  "validdate",
  "valid_dttm",
  "valid_year",
  "valid_month",
  "valid_day",
  "valid_hour",
  "valid_minute",
  "fcst_model",
  "lead_time",
  "sub_model",
  "member",
  "spread_skill_ratio",
  "dropped_members_spread_skill_ratio",
  "dropped_members_spread",
  "parameter",
  "dates",
  "num_stations",
  "fair_crps",
  "fair_brier_score",
  "lon",
  "lat",
  "elev",
  "model_elevation",
  "percentile"
)

assign("meta_colnames", meta_colnames, envir = harpVis_data)
assign("score_colnames", score_colnames, envir = harpVis_data)