clipboardjsDependencies: ClipboardJS source tags

In dgkf/scriptgloss: Functionality for creating static scripts from shiny apps

Description

ClipboardJS source tags

Usage

clipboardjsDependencies()

Value

source tags for loading ClipboardJS from cdn

Examples

## Not run: 
library(shiny)
ui <- fluidPage(
  prismDependencies('r', 'coy'),
  clipboardjsDependencies(),
  selectInput('x', 'x axis', choices = names(mtcars)),
  selectInput('y', 'y axis', choices = names(mtcars)),
  uiOutput('copy_code_btn'),
  plotOutput('plot')
)
srv <- function(input, output, session) {
  output$plot <- renderPlot({
    plot(x = mtcars[[input$x]],
         y = mtcars[[input$y]])
  })
  output$copy_code_btn <- renderUI({
    clipCodeButton(id = "clipboard_btn", text = get_code(srv))
  })
}
shinyApp(ui, srv)

## End(Not run)

dgkf/scriptgloss documentation built on June 8, 2019, 8:43 p.m.