Introduction

As Austin renovates many of their existing stations and works to meet the goal of constructing and opening multiple new Austin Fire Department (AFD) and Austin Travis County Emergency Medical Services (ATCEMS) stations during the next several years.

Data Preparation

The original dataset provided by the official city of City of Austin Open Data Portal the data set includes the fire stations Name,Jurisdiction Name and Location.

url.data <-("https://data.austintexas.gov/api/views/64cq-wf5u/rows.csv?accessType=DOWNLOAD")
fire_stations <- read.csv("https://data.austintexas.gov/api/views/b4k4-adkb/rows.csv?accessType=DOWNLOAD")
fire_stations<- read.csv(url.data, na='')
str(fire_stations)
## 'data.frame':    44 obs. of  5 variables:
##  $ Name             : chr  "FS0031" "FS0002" "FS0007" "FS0030" ...
##  $ Jurisdiction.Name: chr  "AFD" "AFD" "AFD" "AFD" ...
##  $ Y                : num  30.4 30.3 30.3 30.4 30.4 ...
##  $ X                : num  -97.8 -97.7 -97.7 -97.7 -97.7 ...
##  $ Location.1       : chr  "5507 Fm 2222 Rd\nAUSTIN, TX 78731\n(30.357735, -97.786768)" "506 W Martin Luther King Blvd\nAUSTIN, TX 78701\n(30.282028, -97.742966)" "201 Chicon St\nAUSTIN, TX 78702\n(30.258012, -97.724202)" "1021 W Braker Ln\nAUSTIN, TX 78758\n(30.38401, -97.692135)" ...

Mapping Austin’s Fire Station Locations

Below you will find the most current fire stations located in the Austin area.

library(leaflet)
## Warning: package 'leaflet' was built under R version 4.1.3
library(dplyr)
## Warning: package 'dplyr' was built under R version 4.1.3
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
fire_stations<-fire_stations%>%mutate(popup_info=paste(Name,"<br/>",Jurisdiction.Name,"<br/>",Location.1))
fire_stations$popup_info
##  [1] "FS0031 <br/> AFD <br/> 5507 Fm 2222 Rd\nAUSTIN, TX 78731\n(30.357735, -97.786768)"              
##  [2] "FS0002 <br/> AFD <br/> 506 W Martin Luther King Blvd\nAUSTIN, TX 78701\n(30.282028, -97.742966)"
##  [3] "FS0007 <br/> AFD <br/> 201 Chicon St\nAUSTIN, TX 78702\n(30.258012, -97.724202)"                
##  [4] "FS0030 <br/> AFD <br/> 1021 W Braker Ln\nAUSTIN, TX 78758\n(30.38401, -97.692135)"              
##  [5] "FS0040 <br/> AFD <br/> 12711 Harrisglenn Dr\nAUSTIN, TX 78753\n(30.399411, -97.653281)"         
##  [6] "FS0023 <br/> AFD <br/> 1330 E Rundberg Ln\nAUSTIN, TX 78753\n(30.352341, -97.678561)"           
##  [7] "FS0035 <br/> AFD <br/> 5500 Burleston Rd\nAUSTIN, TX 78744\n(30.210129, -97.724558)"            
##  [8] "FS0010 <br/> AFD <br/> 3009 Windsor Rd\nAUSTIN, TX 78703\n(30.295395, -97.766826)"              
##  [9] "FS0015 <br/> AFD <br/> 829 Airport Blvd\nAUSTIN, TX 78702\n(30.257543, -97.693214)"             
## [10] "FS0043 <br/> AFD <br/> 11401 Escarpment Blvd\nAUSTIN, TX 78749\n(30.183114, -97.897652)"        
## [11] "FS0001 <br/> AFD <br/> 401 E 5th St\nAUSTIN, TX 78701\n(30.265838, -97.739591)"                 
## [12] "FS0006 <br/> AFD <br/> 1705 S Congress Ave\nAUSTIN, TX 78704\n(30.246986, -97.750639)"          
## [13] "FS0011 <br/> AFD <br/> 1691 Kinney Ave\nAUSTIN, TX 78704\n(30.253048, -97.767742)"              
## [14] "FS0044 <br/> AFD <br/> 11612 Four Iron Dr\nAUSTIN, TX 78613\n(30.432231, -97.778718)"           
## [15] "FS0026 <br/> AFD <br/> 6702 Wentworth Dr\nAUSTIN, TX 78724\n(30.293241, -97.63143)"             
## [16] "FS0039 <br/> AFD <br/> 7701 River Place Blvd\nAUSTIN, TX 78726\n(30.404375, -97.837628)"        
## [17] "FS0027 <br/> AFD <br/> 5401 Mc Carty Ln\nAUSTIN, TX 78749\n(30.227608, -97.853709)"             
## [18] "FS0016 <br/> AFD <br/> 7000 Reese Ln\nAUSTIN, TX 78757\n(30.339817, -97.722634)"                
## [19] "FS0022 <br/> AFD <br/> 5309 E Riverside Dr\nAUSTIN, TX 78741\n(30.229268, -97.713182)"          
## [20] "FS0003 <br/> AFD <br/> 201 W 30th St\nAUSTIN, TX 78705\n(30.294741, -97.738427)"                
## [21] "FS0034 <br/> AFD <br/> 10041 Lake Creek Pkwy\nAUSTIN, TX 78729\n(30.465858, -97.786574)"        
## [22] "FS0036 <br/> AFD <br/> 500 Ralph Ablanedo Dr\nAUSTIN, TX 78748\n(30.174847, -97.793419)"        
## [23] "FS0019 <br/> AFD <br/> 5211 Balcones Dr\nAUSTIN, TX 78731\n(30.334729, -97.758769)"             
## [24] "FS0024 <br/> AFD <br/> 5811 Nuckols Crossing\nAUSTIN, TX 78744\n(30.187375, -97.742598)"        
## [25] "FS0029 <br/> AFD <br/> 3704 Deer Ln\nAUSTIN, TX 78749\n(30.195953, -97.845823)"                 
## [26] "FS0014 <br/> AFD <br/> 4305 Airport Blvd\nAUSTIN, TX 78723\n(30.299631, -97.708717)"            
## [27] "FS0008 <br/> AFD <br/> 8989 Research Blvd\nAUSTIN, TX 78758\n(30.372163, -97.723397)"           
## [28] "FS0041 <br/> AFD <br/> 11205 Harris Branch Pkwy\nAUSTIN, TX 78754\n(30.346786, -97.612838)"     
## [29] "FS0004 <br/> AFD <br/> 1000 Blanco St\nAUSTIN, TX 78703\n(30.276405, -97.754818)"               
## [30] "FS0037 <br/> AFD <br/> 8700 W Sh 71\nAUSTIN, TX 78735\n(30.250656, -97.89452)"                  
## [31] "FS0020 <br/> AFD <br/> 6601 Manchaca Rd\nAUSTIN, TX 78745\n(30.206792, -97.805995)"             
## [32] "FS0018 <br/> AFD <br/> 6369 Berkman Dr\nAUSTIN, TX 78723\n(30.317413, -97.690519)"              
## [33] "FS0033 <br/> AFD <br/> 9409 Bluegrass Dr\nAUSTIN, TX 78759\n(30.39873, -97.76723)"              
## [34] "FS0012 <br/> AFD <br/> 2109 Hancock Dr\nAUSTIN, TX 78756\n(30.322331, -97.739816)"              
## [35] "FS0045 <br/> AFD <br/> 9421 Spectrum Dr\nAUSTIN, TX 78717\n(30.482101, -97.766185)"             
## [36] "FS0042 <br/> AFD <br/> 2434 Cardinal Loop\nAUSTIN, TX 78617\n(30.215175, -97.656381)"           
## [37] "FS0028 <br/> AFD <br/> 2410 W Parmer Ln\nAUSTIN, TX 78727\n(30.419173, -97.701426)"             
## [38] "FS0025 <br/> AFD <br/> 5228 Duval Rd\nAUSTIN, TX 78727\n(30.418169, -97.74259)"                 
## [39] "FS0009 <br/> AFD <br/> 4301 Speedway\nAUSTIN, TX 78751\n(30.306461, -97.729813)"                
## [40] "FS0038 <br/> AFD <br/> 10111 Anderson Mill Rd\nAUSTIN, TX 78750\n(30.446589, -97.801846)"       
## [41] "FS0032 <br/> AFD <br/> 2804 Montebello Rd\nAUSTIN, TX 78746\n(30.267265, -97.790248)"           
## [42] "FS0021 <br/> AFD <br/> 4201 Spicewood Springs Rd\nAUSTIN, TX 78759\n(30.370906, -97.755809)"    
## [43] "FS0005 <br/> AFD <br/> 1201 Webberville Rd\nAUSTIN, TX 78721\n(30.278099, -97.685082)"          
## [44] "FS0017 <br/> AFD <br/> 4128 S 1st St\nAUSTIN, TX 78745\n(30.224974, -97.771244)"
leaflet()%>%addTiles()%>%addCircleMarkers(data = fire_stations, lat = ~Y,lng = ~X,radius = ~3,popup = ~popup_info)

Conclusion

In this project City of Austin Open Data Portal data was displayed using Leaflet, one of the most popular Javascript libraries for creating interactive maps. By clicking the circle markers on the map you can find the respected address and Jurisdiction of each of Austin’s Fire Stations.