เริ่มต้นใช้งานเริ่มต้นใช้งานได้ฟรี

แผนที่พร้อมคำอธิบายสัญลักษณ์

การใช้สีเพื่อเพิ่มข้อมูลบนแผนที่นั้นดีมาก แต่จะมีประโยชน์ก็ต่อเมื่อเราจำได้ว่าแต่ละสีหมายถึงอะไร ด้วย addLegend() เราสามารถเพิ่มคำอธิบายสัญลักษณ์ (legend) เพื่อช่วยเตือนความจำได้

มีอาร์กิวเมนต์หลายตัวที่ใช้ปรับแต่ง legend ตามต้องการ ได้แก่ opacity, title และ position สำหรับการสร้าง legend ให้กับตัวอย่าง colorNumeric() ของเรา ทำได้ดังนี้

pal <- colorNumeric(palette = "RdBu", domain = c(25:50))

ipeds %>% 
    leaflet() %>% 
        addProviderTiles("CartoDB")  %>% 
        addCircleMarkers(radius = 2,
                         color = ~pal(lat)) %>% 
         addLegend(pal = pal,
                   values = c(25:50),
                   opacity = 0.75,
                   title = "Latitude",
                   position = "topleft")

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

Interactive Maps with leaflet in R

ดูคอร์ส

แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ

ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์

# Add a legend that displays the colors used in pal
m %>% 
    ___(pal = pal, 
              values = c("Public", "Private", "For-Profit"))
แก้ไขและรันโค้ด