Yuseph thing

Check it out

Fetching JSON data from REST APIs

Load library

suppressMessages(library(jsonlite))
suppressMessages(library(ggplot2))

Extract endpoint data (all)

construction_projects <- fromJSON("https://511on.ca/api/v2/get/constructionprojects")

MAP QA

mapWorld <- borders("world", colour="gray50", fill="gray50") # create a layer of borders

## Warning: package 'maps' was built under R version 3.4.4

mp <- ggplot() +   mapWorld
mp <- mp+ geom_point(aes(x=construction_projects$Longitude, y=construction_projects$Latitude) ,color="blue", size=3) 
mp

Download as .csv

write.csv(construction_projects, file = "construction_projects.csv")