knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  # fig.width = 7, 
  # fig.height = 5,
  warning = FALSE,
  message = TRUE
)

If you have any quesitons, please contact me.


shenzutao1990

shenxt@stanford.edu

Twitter

M339, Alway building, Cooper Lane, Palo Alto, CA 94304


# set seed for reproducible widget id
if (requireNamespace("htmltools", quietly = TRUE)) {
  htmlwidgets::setWidgetIdSeed(42)
}
library(leaflet)
leaflet(width = "100%") %>%
  addTiles() %>%
  addMarkers(
    lng = -122.174878,
    lat = 37.432402,
    popup = "Stanford Medicine"
  )


jaspershen/metflow2 documentation built on Aug. 15, 2021, 4:38 p.m.