library(readr)
download.file(url = "http://data.cyc.opendata.arcgis.com/datasets/fd6a709a29bf4f6ca085adb956ce127c_15.csv",
destfile = "york.csv")
york <- readr::read_csv("york.csv")
names(york) <- c("long",
"lat",
"object_id",
"desig_id",
"pref_ref",
"name",
"grade")
# names(york_listed_buildings)
# View(york_listed_buildings)
# current way to access the data, 2018 - 05 - 20
# download.file(url = "https://opendata.arcgis.com/datasets/1dd964a0cae448c2b75097a8ff6a2227_15.csv",
# destfile = "york.csv")
#
# york <- readr::read_csv("york.csv")
#
# names(york) <- c("long",
# "lat",
# "desig_id",
# "bldg_name",
# "grade",
# "status_date"
# "esri_oid")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.