smooth.Rt function

Smooth real-time reproduction number over larger time periods