Skip to content

Instantly share code, notes, and snippets.

@ashander
Created August 26, 2014 20:26
Show Gist options
  • Save ashander/15b254d3d6ebbf9a774f to your computer and use it in GitHub Desktop.
Save ashander/15b254d3d6ebbf9a774f to your computer and use it in GitHub Desktop.
Grabbing data from html tables in ESA-archived data
# get data from html tables in ESA archive
# http://www.esapubs.org/archive/mono/M081/023/suppl-1.htm
library(XML)
root <- 'http://www.esapubs.org/archive/mono/M081/023'
tips <- c('limn.html', 'latitudes.html', 'fish.html', 'acronyms.html')
dat <- lapply(tips, function(t)
readHTMLTable(paste(root, t, sep='/')))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment