b = 0.95 (slider from 0 to 5, step 0.05)
a = 1.25 (slider from 0 to 5, step 0.05)
S'(t, S, I, R) = (((-a) * S) * I)
I'(t, S, I, R) = ((a * S) * I) - (b * I)
R'(t, S, I, R) = (b * I)
c = 0.0015 (slider from 0 to 0.1, step 1.0E-4)
IntégraleNumérique1, IntégraleNumérique1_2, IntégraleNumérique1_3 = NSolveODE({S', I', R'}, 0, {1 - c, c, 0}, 200)