marcosci

# load libraries
library(tidyverse)
library(osmdata)
library(sf)
library(ggtext)
library(exactextractr)
library(fasterize)
library(ggtext)
library(tidygeocoder)
library(glue)

jebyrnes

#Load the library and make a basic map
library(leaflet)
leaflet() %>% addTiles()


#Show a map with a satellite picture on it 
leaflet() %>% 
  addTiles(urlTemplate="http://server.arcgisonline.com/ArcGIS/rest/services/World_Imagery/MapServer/tile/{z}/{y}/{x}")

#Make a demo fake data set

celoyd

#!/usr/bin/env python

import psycopg2 as pg
import Image
from sys import argv

conn = pg.connect(database='tweets', user='char', host='localhost')
cur = conn.cursor()

pxper = 16

aaronwolen

% Title % Name % Date

My first slide

List

gufodotto

library(shiny)
library(deSolve) 
library(ggplot2)

# Define server logic required to plot various variables
shinyServer(function(input, output) {
  
  solveLorenz <- function(pars, times=tout) {
    derivs <- function(t, state, pars) { # returns rate of change
      with(as.list(c(state, pars)), {

mbostock

license: gpl-3.0
height: 600
redirect: https://observablehq.com/@d3/d3-force-directed-graph

geotheory

library(rgeos)

data(wrld_simpl)
plot(wrld_simpl, col='white', bg='grey9', border=NA)

limx <- c(-6,1)
limy <- c(49,60)
plot(wrld_simpl, xlim=limx, ylim=limy, col='white', bg='grey9', border=NA)

# Apply RDP algorithm with distance variable = 0.4 degrees