R: fixed a check warning in the docs, plot.sir() shold match plot().