rgbif (version 0.3.0)

togeojson: Convert spatial data files to GeoJSON from various formats.

Description

The web option uses the Ogre web API. Ogre currently has an output size limit of 15MB. See here http://ogre.adc4gis.com/ for info on the Ogre web API. The local option uses the function writeOGR from the package rgdal.

Note that for Shapefiles, GML, MapInfo, and VRT, you need to send zip files to Ogre. For other file types (.bna, .csv, .dgn, .dxf, .gxt, .txt, .json, .geojson, .rss, .georss, .xml, .gmt, .kml, .kmz) you send the actual file with that file extension.

If you're having trouble rendering geoJSON files, ensure you have a valid geoJSON file by running it through a geoJSON linter http://geojsonlint.com/.

Usage

togeojson(input, method = "web", destpath = "~/",
    outfilename = "myfile")

Arguments

input

The file being uploaded, path to the file on your machine.

method

One of web or local. Matches on partial strings.

destpath

Destination for output geojson file. Defaults to your root directory ("~/").

outfilename

The output file name, without file extension.

Details

You can use a web interface called Ogre, or do conversions locally using the rgdal package.

See Also

stylegeojson

Examples

file <- '/Users/scottmac2/Downloads/taxon-placemarks-2441176.kml'

# KML type file - using the web method
togeojson(file, method='web', outfilename="kml_web")

# KML type file - using the local method
togeojson(file, method='local', outfilename="kml_local")

# Shp type file - using the web method - input is a zipped shp bundle
file <- '~/github/sac/bison.zip'
togeojson(file, method='web', outfilename="shp_web")

# Shp type file - using the local method - input is the actual .shp file
file <- '~/github/sac/bison/bison-Bison_bison-20130704-120856.shp'
togeojson(file, method='local', outfilename="shp_local")

# Get data and save map data
splist <- c('Accipiter erythronemius', 'Junco hyemalis', 'Aix sponsa')
out <- occurrencelist_many(splist, coordinatestatus = TRUE, maxresults = 50)
dat <- gbifdata(out)
names(dat)[names(dat) %in% c("decimalLatitude","decimalLongitude")]
   <- c("latitude","longitude")
dat <- stylegeojson(input=dat, var="taxonName", color=c("#976AAE","#6B944D","#BD5945"),
   size=c("small","medium","large"))
write.csv(dat, "~/github/sac/mygeojson/rgbif_data.csv")
file <- "~/github/sac/mygeojson/rgbif_data.csv"
togeojson(file, method = "web", destpath = "~/github/sac/mygeojson/",
   outfilename = "rgbif_data")