Underprediction component of the weighted interval score

Requires symmetric quantile forecasts. Roughly, a penalty for predicted quantiles larger than .5 falling under the observed value.

underprediction(quantile, value, actual_value)

Arguments

quantile	vector of forecasted quantiles
value	vector of forecasted values
actual_value	Actual value.