Instantly share code, notes, and snippets.

Embed
What would you like to do?
library(shiny)
library(tidyverse)
library(gapminder)
# User Interface
ui <- basicPage(
plotOutput(outputId = "myplot")
)
# Server
server <- function(input, output) {
output$myplot <- renderPlot({
#your plot code here:
})
}
shinyApp(ui, server)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment