Added shiny implementation- doesn't work