


Summarise(points_sum = sum(points)), by="hospital") %>% Pivot_wider(names_from = metrickey, values_from = r4q_percent) %>% Select(hospital,volume_group,metrickey,r4q_percent) %>% Title = md("Percentile Group Data Table"),įilter(YrQTRid = input$yrqtrid & metrickey %in% c(input$metrickey)) %>% Percentile10, percentile25, percentile50, percentile75, percentile90 Select(metrickey,metric,YrQTRid,percentile10,percentile25,percentile50,percentile75,percentile90) %>%įilter(YrQTRid = input$yrqtrid & metrickey %in% c(input$metrickey)) # Define server logic required to draw a histogram Table outputs fine its table2 that I keep getting error: just wondering if someone see a syntax error something that i keep missing Im trying to push a report to a local shiny server by just copying the global.R ui.R and server.R file to a directory I have done this before but i keep getting an error: for the one table and for the life of me I cannot figure it out since the app works perfectly fine when I run it from Rstudio I know people are gonna be like post a reproduce runnable code but any other time i try it works fine.
