#' averaged to provide a smooth prediction. This forecast will most of the time be wrong,
#' but will also look plausible enough.
#'
+#' @usage f <- AverageForecaster$new(pjump)
+#'
#' @docType class
#' @format R6 class, inherits Forecaster
#' @aliases F_Average