Skip to content

Instantly share code, notes, and snippets.

View sniderg's full-sized avatar

Graydon Snider sniderg

View GitHub Profile
library(data.table)
library(httr)
library(plyr)
library(tools)
#get data from web - don't run every time!
urls <- read.table('GBD_links.txt')
urls <- as.data.table(urls)
urls <- grep("http", urls$V1, value=T)
<html>
<head>
<title>Google Maps Multiple Markers</title>
<script src="http://maps.google.com/maps/api/js?sensor=false" type="text/javascript"></script>
</head>
<body>
<div id="map" style="height: 400px; width: 500px;">
</div>
<script type="text/javascript">