Developing data products Shiny assignment