Replace some points with lines in timeseries.r