Having problems in displaying html script in R Shiny

Question

I am trying to create a dashboard with a SelectInput where there will be several choices, and picking a different choice will run a different HTML script on the main panel.