https://github.com/the-y-company/flexfilter

Flexible filter for Shiny
https://github.com/the-y-company/flexfilter

Last synced: 3 months ago
JSON representation

Flexible filter for Shiny

• Host: GitHub
• URL: https://github.com/the-y-company/flexfilter
• Owner: the-y-company
• License: gpl-2.0
• Created: 2024-04-21T09:00:06.000Z (7 months ago)
• Default Branch: master
• Last Pushed: 2024-07-09T08:25:05.000Z (4 months ago)
• Last Synced: 2024-07-09T10:52:16.530Z (4 months ago)
• Language: HTML
• Homepage: https://flexfilter.the-y-company.com/
• Size: 1.78 MB
• Stars: 6
• Watchers: 3
• Forks: 0
• Open Issues: 0
• Metadata Files:
  • Readme: README.md
  • License: LICENSE.md

Awesome Lists containing this project

• awesome-shiny-extensions - flexfilter - Create a filter from a data frame that enables users to dynamically add filters on each column. The filter dynamically generates the appropriate input for the selected column based on its type. (UI Components / Advanced Interactivity)
• jimsghstars - the-y-company/flexfilter - Flexible filter for Shiny (HTML)

README

        


# flexfilter

Flexible filters for shiny.

Create a filter from a `data.frame` that enables users to dynamically add

filters on each column, the filter is dynamically generating the appropriate

input for the selected column based on the type of the column.

## Example

```r

library(shiny)

library(flexfilter)

data <- data.frame(

  text = letters[1:10],

  factors = as.factor(LETTERS[1:10]),

  numeric = runif(10),

  integer = 1:10,

  date = seq.Date(Sys.Date()-9, Sys.Date(), by = "day"),

  logical = sample(c(T, F), 10, replace = TRUE)

)

ui <- fluidPage(

  theme = bslib::bs_theme(5L),

  flexfilterUI("filter"),

  DT::DTOutput("table")

)

server <- function(input, output, session) {

  values <- flexfilter_server("filter", data)

  output$table <- DT::renderDT({

    if(!length(values()$exprs))

      return(data)

    data |>

      dplyr::filter(!!!values()$exprs) |>

      DT::datatable()

  })

}

shinyApp(ui, server)

```

![](docs/images/search.gif)

This product was funded by [The Association of State and Territorial Health Officials](https://www.astho.org),

and was supported by [OE22-2203: Strengthening U.S. Public Health Infrastructure, Workforce, and Data Systems grant](https://www.cdc.gov/infrastructure/phig/index.html)

Number 6 NE11OE000066, funded by CDC. 

Its contents are solely the responsibility of the authors and do not necessarily represent 

the official views of CDC.