Created simulation code, Shiny code