## S3 method for class 'sir':
plot(x, comp = c("NI", "NS", "NR"), median = TRUE,
quantiles = c(0.1, 0.9), color = NULL, median_color = NULL,
quantile_color = NULL, lwd.median = 2, lwd.quantile = 2,
lty.quantile = 3, xlim = NULL, ylim = NULL,
xlab = "Time", ylab = NULL, ...)sir function.NULL, then it is calculated from the data.NULL, then it is calculated from the data.NULL then it is automatically added
based on the comp argument.plot, that is
run before any of the curves are added, to create the figure.sir for running the actual simulation.g <- erdos.renyi.game(100, 100, type="gnm")
sm <- sir(g, beta=5, gamma=1)
plot(sm)Run the code above in your browser using DataLab