In JohnCoene/billboard: htmlwidget for billboard.js

billboard

library(billboard)

df <- data.frame(x = 1:10, w = runif(10, 0, 5), y = runif(10, 0, 5), z = runif(10, 0, 5))

df %>%
  b_board(x) %>%
  b_area_spline(w) %>% 
  b_area_spline(y, stack = TRUE) %>% 
  b_area_spline(z, stack= TRUE)

Check the Website

Chart types
Installation
Examples
Proxies
Functions

Installation

# install.packages("devtools")
devtools::install_github("JohnCoene/billboard")

Chart types

line
spline
bar
scatter
step
area
area step
area spline
pie
donut
gauge

Examples

Includes but is not limited to:

library(billboard)

mtcars %>% 
  b_board() %>%
  b_spline(wt) %>% 
  b_bar(disp, axis = "y2") %>% 
  b_step(cyl) %>% 
  b_area(qsec) %>% 
  b_scatter(hp, axis = "y2") %>% 
  b_xlabel("Miles per galon") %>% 
  b_color_brewer("Accent") %>% 
  b_tooltip(grouped = TRUE) %>% 
  b_grid_line(9, "Marked") %>% 
  b_grid_line(17, "avg (maybe)", axis = "y") %>% 
  b_region("x", 1, 4,)

Proxies

Features Shiny proxies; functions ending in _p.

Proxies:

billboardProxy - Create billboard proxy for Shiny
b_zoom_p - Zoom proxy
b_focus_p - Foxus proxy
b_defocus_p - Unfocus proxy
b_transform_p - Transform chart proxy
b_stack_p - Stack proxy
b_region_p - Customise regions proxy
b_add_region_p - Add region proxy
b_flow_p - Add rows
b_load_p - Add columns

Basic Example

See proxy documentation for more details ?b_flow_p

Demo

libary(shiny)
library(billboard)

shinyApp(
  ui = fluidPage(
    selectInput(
      "transform",
      "Change chart type:",
      choices = c("line", "spline", "area", "area-spline", "scatter", "bar"),
      selected = "line"
    ),
    billboardOutput("b_board")
  ),
  server = function(input, output){

  data <- data.frame(y = runif(25, 1, 25))

    output$b_board <- renderBillboard({
      data %>% 
        b_board() %>% 
        b_line(y, name = "Values")
    })

    observeEvent(input$transform, {
      billboardProxy("b_board") %>% 
      b_transform_p(input$transform, "Values")
    })
  }
)