Running code inside reprex function is pointless unless you are providing a proper reproducible example that includes sample data, could you please prepare a reproducible example (reprex) illustrating your issue? Please have a look at this guide, to see how to create one for a shiny app