Skip to content

Instantly share code, notes, and snippets.

Avatar

Charles Hans Thompson hansthompson

  • Anchorage, Alaska
View GitHub Profile
@jcheng5
jcheng5 / server.R
Last active June 17, 2021 18:37
Shiny example: Diamonds Explorer
View server.R
library(shiny)
library(ggplot2)
function(input, output) {
dataset <- reactive({
diamonds[sample(nrow(diamonds), input$sampleSize),]
})
output$plot <- renderPlot({