Kasia KKulma
KKulma
/ shiny-select-group-from-plot
Created
February 12, 2019 13:36
The app demonstrates how to fetch group info information from `plot_click` attribute and use it to subset a `dataTableOutput`.
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(shiny) | |
| library(ggplot2) | |
| library(DT) | |
| ### The app demonstrates how to fetch group info information from `plot_click` attribute and use it to subset a `dataTableOutput`. | |
| ### redoing the SO answer from https://stackoverflow.com/a/38919892/6327771 (example 2) | |
| ui <- fluidPage( | |
| # selectInput("var_y", "Y-Axis", choices = names(iris)), |
KKulma
/ shiny-dbclick-reveal-group.R
Created
February 12, 2019 12:58
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(shiny) | |
| library(ggplot2) | |
| ### redoing the SO answer from https://stackoverflow.com/a/38919892/6327771 (example 2) | |
| ui <- fluidPage( | |
| # selectInput("var_y", "Y-Axis", choices = names(iris)), | |
| plotOutput("distPlot", dblclick = "plot_click"), | |
| uiOutput("dynamic") |