Timothée Giraud rCarto

## CreateRoutes.R
library(maptools)
library(maps)
library(mapdata)
library(rjson)
library(stringr)
library(RCurl)
library(ggplot2)


GetDirections <- function(from, to) {
	library(maptools)
	library(maps)
	library(mapdata)
	library(rjson)
	library(stringr)
	library(RCurl)
	library(ggplot2)


	GetDirections <- function(from, to) {