Figure1

R script computing and plotting the equilibrium states for a susceptible population, according to the rat's maximal birth rate, r, and the transmission rate, beta. (a) K = 25,000 rats, (b) K = 1,000 rats.