cholera R simulation