````{cat, engine.opts = list(file = "template.rmd")}

{{ layout }}

```r}" } library(leaflet) leaflet() %>% addTiles() %>% # Add default OpenStreetMap map tiles addMarkers(lng=174.768, lat=-36.852, popup="The birthplace of R")

````

```r
insert_leaflet <- function(layout = "l-body") {
  knitr::knit_child(text = knitr::knit_expand("template.rmd", layout = layout))
}

r insert_leaflet('l-body')

r insert_leaflet('l-body-outset')

r insert_leaflet('l-page')

r insert_leaflet('l-screen')

r insert_leaflet('l-screen-inset')

r insert_leaflet('l-screen-inset shaded')

unlink("template.rmd")


radixpub/radix-r documentation built on Nov. 24, 2023, 11:21 a.m.