Better to post on RStudio support, I think. Shiny is an RStudio package and product and this list if for R language/programming help. The two are separate.
Bert Gunter "The trouble with having an open mind is that people keep coming along and sticking things into it." -- Opus (aka Berkeley Breathed in his "Bloom County" comic strip ) On Sat, Nov 7, 2020 at 2:43 AM Ritwik Mohapatra <rit...@gmail.com> wrote: > Hi All, > > I have a data output as below.I want to display them in an interactive html > report using shiny but the data table is not rendering properly and instead > giving NA values. > > > max_usage_hours_per_region<-setNames(aggregate(df3_machine_region$sum_as_hours~df3_machine_region$Region,df3_machine_region,max),c("Region","Sum_as_Hours")) > > Region Sum_as_Hours > 1 Africa 1156.0833 > 2 Americas 740.1667 > 3 APAC 740.2833 > 4 Europe 1895.2000 > 5 PDO 1053.3500 > 6 UK 0.0000 > > > Rshiny code: > > library(shiny) > > ui <- fluidPage( > selectInput("Region","Select > Region",max_usage_hours_per_region$Region,selected = TRUE), > tableOutput("table") > ) > server <- function(input, output) { > output$table <- renderTable( > max_usage_hours_per_region[input$Region,]) > } > shinyApp(ui = ui, server = server) > > [[alternative HTML version deleted]] > > ______________________________________________ > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide > http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. > [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.