Add example using API key

crazycapivara · Jul 17, 2021 · 9542e20 · 9542e20
1 parent 7f6b35c
commit 9542e20
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/examples/graphhopper-use-api-key.R b/examples/graphhopper-use-api-key.R
@@ -0,0 +1,12 @@
+library(graphhopper)
+
+key <- "your-api-key"
+Sys.setenv(GH_API_KEY = key)
+
+gh_set_api_url("https://graphhopper.com/api/1/")
+
+start_point <- c(52.592204, 13.414307)
+end_point <- c(52.539614, 13.364868)
+
+gh_get_route(list(start_point, end_point)) %>%
+  gh_as_sf()