axis label for time series in summary plot is wrong

[benj919]

the indexing for the timestep labels on the x-axis is wrong.

line 132-134

  axis_lab <- seq(from=1, to=nrow(d), length.out = max((nrow(d)/20),2))
  axis(1, at=rev(as.numeric(rownames(d)))[axis_lab], labels = rownames(d)[axis_lab])
  mtext(side=1, text="Time steps", line=2.5, cex=1.1)

the "at" uses the row number 0 as starting index. indexing is positional and starts at 1. hence all axis labels are shifted by one to the left