CLICK ME
yes, even hidden code blocks!
print("hello world!")
library(shiny) | |
ui <- fluidPage( | |
tags$head( | |
tags$style(HTML(" | |
body { | |
margin-right: 10em; |
library(shiny) | |
shinyApp( | |
ui = basicPage( | |
actionButton("show", "Show modal dialog"), | |
verbatimTextOutput("print") | |
), | |
server = function(input, output) { | |
license: gpl-3.0 | |
height: 420 | |
border: no |
library(rgdal) # R wrapper around GDAL/OGR | |
library(ggplot2) # for general plotting | |
library(ggmaps) # for fortifying shapefiles | |
# First read in the shapefile, using the path to the shapefile and the shapefile name minus the | |
# extension as arguments | |
shapefile <- readOGR("path/to/shapefile/", "name_of_shapefile") | |
# Next the shapefile has to be converted to a dataframe for use in ggplot2 | |
shapefile_df <- fortify(shapefile) |