MarkEdmondson1234 take out rsay reference in shiny app