Project

Data Source

The data for this map is taken from the Sacramento real estate transactions over a 5 day period. Source: https://support.spatialkey.com/spatialkey-sample-csv-data/

Reading Data

data <- "http://samplecsvs.s3.amazonaws.com/Sacramentorealestatetransactions.csv"
df <- read.csv(url(data))
df <- df[sample(nrow(df), 500), c(11,12)]

Plotting Map

The map displays clusters of Sacramento real estate transactions.

library(leaflet)

df %>%
  leaflet() %>%
  addTiles() %>%
  addMarkers(clusterOptions = markerClusterOptions())