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

สร้าง Pop-up ที่ดีขึ้น

ด้วยฟังก์ชัน paste0() และแท็ก HTML บางตัว เราสามารถปรับแต่ง pop-up ได้ตามต้องการ paste0() จะแปลงอาร์กิวเมนต์ทั้งหมดเป็น character แล้วรวมเข้าด้วยกันเป็น string เดียวโดยไม่มีตัวคั่น

addCircleMarkers(popup = ~paste0(name,
                                 "<br/>",
                                 sector_label))

เราสามารถใช้แท็ก <br/> เพื่อขึ้นบรรทัดใหม่ ทำให้แต่ละข้อมูลแสดงอยู่คนละบรรทัด

เพื่อให้แยกแยะข้อมูลแต่ละส่วนได้ชัดเจนขึ้น เราสามารถทำให้ชื่อของแต่ละสถาบันเป็นตัวเอียงได้ โดยครอบตัวแปร name ด้วย <i></i>

addCircleMarkers(popup = ~paste0("<i>",
                                 name,
                                 "</i>", 
                                 "<br/>", 
                                 sector_label))

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

Interactive Maps with leaflet in R

ดูคอร์ส

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

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

# Clear the bounds and markers on the map object and store in map2
map2 <- map %>% 
            ___() %>% 
            ___()
แก้ไขและรันโค้ด