Southwest Iowa Region Mental Health & Disability Services

Dataset was scraped from the MHDS website.

southwest_mhds

Format

A data frame with 356 rows and 13 variables:

category: Service type provided at facility
county: Iowa county name
related records: Currently Unknown
service title: Name of the facility
address: Column containing location information: Street, City, State, Zip
phone: Phone Number for the facility
description: A description to help the viewer navigate which facility is best for them
website: Facility website link
email: Contact Email for facility
expiration: Currently Unknown
last updated: Date at which website information was last updated
longitude: geographic Longitude
latitude: geographic Latitude

Source

https://www.aa-iowa.org/meetings/

Examples

# Location of MHDS in Iowa
library(ggplot2)
library(dplyr)
southwest_mhds %>%
 ggplot() +
 geom_point(aes(x = longitude, y = latitude))
#> Warning: Removed 15 rows containing missing values (geom_point).

# Leaflet map of meetings in Iowa
library(leaflet)
library(sf)

southwest_mhds %>%
 leaflet() %>%
 addTiles() %>%
 addPolygons(data = ia_counties,
             weight = 1, color="#333333") %>%
 addCircleMarkers(lng = ~longitude, lat = ~latitude,
                  radius = 1, stroke = 0.1,
                  label = ~southwest_mhds)
#> Warning: Data contains 15 rows with either missing or invalid lat/lon values and will be ignored