R语言代码，传染病传播的SIR模型，可直接应用仿真模拟 (SIR model the spread of infectious diseases, it is full, the simulation can be applied directly)(R language code, simulating SIR model)