Tổng quan Chương 2

Bản đồ tương tác với leaflet trong R

Rich Majerus

Vice President of Strategy & Planning, Queens University of Charlotte

Chỗ ta đã dừng lại

leaflet() %>% 
    addProviderTiles("CartoDB") %>% 
    addMarkers(lng = dc_hq$lon, lat = dc_hq$lat, popup = dc_hq$hq)

Bản đồ cuối chương một

Dọn dẹp bản đồ nền

m <- m %>% 
    setView(lat = 50.881363, 
            lng = 4.717863,
            zoom = 5)

Ví dụ ClearBounds() 1

# Khôi phục khung nhìn dựa trên
# dữ liệu hiển thị trên bản đồ
m  %>%
    clearBounds()

Ví dụ ClearBounds() 2

Dọn dẹp bản đồ nền

# Khôi phục khung nhìn dựa trên
# dữ liệu hiển thị trên bản đồ
m  %>%
    clearBounds()

Ví dụ clearMarkers() 1

# Xóa các marker
m  %>%
    clearBounds() %>% 
    clearMarkers()

Ví dụ clearMarkers() 2

IPEDS

Hệ thống Dữ liệu Giáo dục Sau trung học Tổng hợp (IPEDS)
Do National Center for Education Statistics (NCES) quản lý
Dữ liệu từ mọi cơ sở tham gia các chương trình hỗ trợ tài chính sinh viên liên bang
- cao đẳng
- đại học
- cơ sở kỹ thuật và dạy nghề

Bộ dữ liệu IPEDS của chúng ta

> glimpse(ipeds)

Observations: 3,146
Variables: 5
$ name         <chr> "A T Still University of Health Sciences",...
$ lng          <dbl> -92.58918, -99.70954, -83.52828, -93.29968, ...
$ lat          <dbl> 40.19365, 32.46915, 31.48189, 44.85621, 29.65008, ...
$ state        <chr> "MO", "TX", "GA", "MN", "FL", "CA", "CA", "CA",... 
$ sector_label <chr> "Private", "Private", "Public", "For-Profit", ...

Bộ dữ liệu IPEDS của chúng ta

ipeds %>% group_by(state) %>% count %>% arrange(desc(n))

# A tibble: 56 x 2
# Groups:   state [56]
   state     n
   <chr> <int>
 1    CA   286
 2    NY   239
 3    PA   164
 4    FL   160
 5    TX   157

Mục tiêu Chương 2

Lọc dữ liệu cho các trường ở California
Vẽ bản đồ tất cả trường ở California
Dùng vòng tròn thay vì ghim
Tô màu marker theo khu vực

Các trường California theo khu vực

Cùng luyện tập nào!

Bản đồ tương tác với leaflet trong R