Cruess Hall:
library(leaflet) cruess <- c(38.5432, -121.7536)##coordinates obtained using google map, right click, copy leaflet() %>% addTiles() %>% setView(lng = cruess[2], lat = cruess[1], zoom = 16)