I will put various pieces of R-code that I have been working on here.
circle.R is a statistical joke, so just a bit of fun that I came up with a few years ago. Perhaps some people will get it.
The other files are either epidemiological models or optimal control models and soon some code for solving differential games.
scabfit.R fits an epidemiological compartmental model for the parasitic disease psoroptes ovis using some data that I have put together from public sources.It is basically a demonstration of how one can use the package FME to fit parameters to epidemiological compartmental models and how to estimate underreporting from case data.