seirs.app function

Launch a shiny-app simulating the SEIRS model