library(leaflet)
library(dplyr)
## Warning: package 'dplyr' was built under R version 3.5.1
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
raw2 = read.csv("volcanoLocation.csv")
map = leaflet() %>% addTiles() %>% addMarkers(lat = raw2$lat,lng = raw2$lng,popup = raw2$popup,clusterOptions = markerClusterOptions())
map