#r #shiny
Вопрос:
Можем ли мы отобразить таблицу DT под графиком, когда мышь наводится на любую точку данных. В основном таблица DT должна отображать только точку, в которой происходит наведение
library(shiny)
library(plotly)
ui <- fluidPage(
plotlyOutput("lchart")
)
server <- function(input, output, session) {
output$lchart <- renderPlotly({
plot_ly(iris) %>%
layout(yaxis = list(title = "Total")) %>%
add_trace(x = ~Sepal.Width, y = ~Petal.Width, type='scatter', yaxis = "y1", color = I("#3090C7"),name = 'Plot')
})
}
shinyApp(ui, server)