Roland Hansson rhansson

## example_getpoints.R
# Download JSON via GeoTuple API
# http://geotuple.org//pages/api.html

library(jsonlite)
library(httr)

# Thanks to http://stackoverflow.com/users/5729528/daeyoung-kim
# for this function
getFunctionEndPoint <- function(url, format) {
  return(paste(url, format, sep = '/'))
	# Download JSON via GeoTuple API
	# http://geotuple.org//pages/api.html

	library(jsonlite)
	library(httr)

	# Thanks to http://stackoverflow.com/users/5729528/daeyoung-kim
	# for this function
	getFunctionEndPoint <- function(url, format) {
	return(paste(url, format, sep = '/'))