addPolygons(data=MadisonSwanson, fillOpacity=0.5, stroke=FALSE,
fillColor='#66c2a5',
popup= ~ paste("<a><b>Madison and Swanson</a></b>",
"Seasonal area closures implemented to protect Gulf reef fish",
'<a href="http://sero.nmfs.noaa.gov/maps_gis_data/fisheries/gom/documents/madswan_steam_edges.txt" target="_blank">Federal regulations</a>',
'<iframe src="http://sero.nmfs.noaa.gov/maps_gis_data/fisheries/gom/documents/madswan_steam_edges.txt"></iframe>',
sep="<br/>"),
group="Madison and Swanson") %>% '<iframe src="http://sero.nmfs.noaa.gov/maps_gis_data/fisheries/gom/documents/madswan_steam_edges.txt"></iframe>'