attach(ternary_forecast_example) #see also documentation of sample data
#?ternary_forecast_example
# Calibrated forecast sample
calsim0 = calibration_simplex(p1 = p1, p3 = p3, obs = obs0)
plot(calsim0,use_pvals = TRUE) # with multinomial p-values
# Overconfident forecast sample
calsim1 = calibration_simplex(p1 = p1, p3 = p3, obs = obs1)
plot(calsim1)
# Underconfident forecast sample
calsim2 = calibration_simplex(p1 = p1, p3 = p3, obs = obs2)
plot(calsim2,use_pvals = TRUE) # with multinomial p-values
# Unconditionally biased forecast sample
calsim3 = calibration_simplex(p1 = p1, p3 = p3, obs = obs3)
plot(calsim3)
# Using a different number of bins
calsim = calibration_simplex(n=4, p1 = p1, p3 = p3, obs = obs3)
plot(calsim)
calsim = calibration_simplex(n=13, p1 = p1, p3 = p3, obs = obs3)
plot(calsim, # using some additional plotting parameters:
error_scale = 0.5, # errors are less pronounced (smaller shifts)
min_bin_freq = 100, # dots are plotted only for bins,
# which contain at least 100 forecast-outcome pairs
category_labels = c("below-normal","near-normal","above-normal"),
main = "Sample calibration simplex")
detach(ternary_forecast_example)
Run the code above in your browser using DataLab