Slidify show motivating the shinyMortgageAffordability app