blur R Markdown console tab when Shiny doc is stopped