Minimal epiestim wrapper to execute a time series R_t using a discrete infectivity profile matrix, and format the result to be consistent with the rest of this..

epiestimRtEstimate(
  simpleTimeseries,
  yMatrix,
  bootstraps = 10 * dim(yMatrix)[2],
  window = 14
)