library(tidyverse)

## -- Attaching packages ------------------------------------------------------------------------------- tidyverse 1.2.1 --

## v ggplot2 2.2.1     v purrr   0.2.4
## v tibble  1.4.2     v dplyr   0.7.4
## v tidyr   0.8.0     v stringr 1.3.0
## v readr   1.1.1     v forcats 0.3.0

## -- Conflicts ---------------------------------------------------------------------------------- tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()

library(ggmap)
library(DT)
library(knitr)
library(SparkR)

## 
## Attaching package: 'SparkR'

## The following objects are masked from 'package:dplyr':
## 
##     arrange, between, coalesce, collect, contains, count,
##     cume_dist, dense_rank, desc, distinct, explain, filter, first,
##     group_by, intersect, lag, last, lead, mutate, n, n_distinct,
##     ntile, percent_rank, rename, row_number, sample_frac, select,
##     sql, summarize, union

## The following objects are masked from 'package:purrr':
## 
##     negate, when

## The following objects are masked from 'package:stats':
## 
##     cov, filter, lag, na.omit, predict, sd, var, window

## The following objects are masked from 'package:base':
## 
##     as.data.frame, colnames, colnames<-, drop, endsWith,
##     intersect, rank, rbind, sample, startsWith, subset, summary,
##     transform, union

library(leaflet)
library(htmltidy)

Downtown_Jacksonville <- leaflet() %>%
  addTiles() %>%
  setView(-81.655210, 30.324303, zoom = 16) %>%
  addMarkers(lng=-81.655210, lat=30.324303, 
    popup="<b>Meeting point</b><br><a href='http://ire.org/conferences/nicar2017/'>-Jonathan 2018</a>")

Downtown_Jacksonville