In appOriginal.R we create a simple app that involves quite a bit of code replication. In app.R we refactor the application to use Shiny Modules.
The code is available on Github: https://github.com/slopp/ShinyModulesDemo
A live demo is available: https://beta.rstudioconnect.com/seanlopp/ShinyModulesDemo/
To view a direct comparison of the two files open up the pull request where I've committed the changes to appOriginal.