# NOT RUN {
ca <- airnow_load(20160801, 20160831, stateCodes='ca')
# Google map
map <- monitorGoogleMap(ca)
addIcon("orangeFlame", ca$meta$longitude, ca$meta$latitude, map=map, expansion=0.1)
# line map
monitorMap(ca)
addIcon("orangeFlame", ca$meta$longitude, ca$meta$latitude, expansion=0.002)
# }
Run the code above in your browser using DataLab