Hi.
I have been preparing a dashboard and I've been experiencing an issue.
when I clicked a bar chart (Co9) as figure 1, the table has not shown any thing (figure 2).
I am not sure which part of my code, that should be fixed it.
I am guessing, this part should be solved?
Bar clicked (server) --------------------------------------------
observeEvent(input$bar_clicked, {
customer <- as.character(input$bar_clicked)
month <- input$month
tab_title <- paste(
input$sale, "-", customer,
if (month != 99) {
paste("-", month.name[as.integer(month)])
}
)
if (!(tab_title %in% tab_list)) {
appendTab(
inputId = "tabs",
tabPanel(
tab_title,
DT::renderDataTable(
get_details(customer = customer)
)
)
)
tab_list <<- c(tab_list, tab_title)
}
updateTabsetPanel(session, "tabs", selected = tab_title)
})
This is my dataset.
Thank you so much.