Top 10 Best colleges for Data Science in California, US

Developing Data Products Week2 Assignment

Doris Chen
2023-02-23

Data Source: EduRank

Load packages and data

library(dplyr)
library(leaflet)
edu <- read.csv("eduRank.csv")

Edit icon color

Icons <- makeAwesomeIcon(iconColor = 'transparent')

Create the map

edu %>% 
        leaflet() %>% 
        addTiles() %>% 
        addAwesomeMarkers(lat=edu$lat, lng=edu$lng, label=edu$num, 
                         labelOptions = labelOptions(permanent=TRUE, textOnly=TRUE, textsize = "15px", style=list(color="white"), direction="top"), 
                         icon=Icons,
                         popup=paste('<strong>', edu[,1],  '</strong>', edu[,2], edu[,3], edu[,4], sep = "<br/>"))