library(knitr) library(kableExtra) library(rapbase) knitr::opts_chunk$set(echo = FALSE)
Dette er eksempel på en samlerapport som er egnet til å kobinere presentasjon av dynamisk tekst, tabeller og figurer. Samlerapporter kan vises i selve resultattjenesten eller lastes ned.
Idag, r format(Sys.Date(), "%A %d. %b %Y")
er det
r as.numeric(format(Sys.Date(), "%j"))
dager siden nyttår
Tabellen under er enkel, men illustrerer poenget:
dt <- mtcars[1:6, ][params$var] kable(dt) %>% kable_styling(bootstrap_options = c("striped", "hover", "condensed"))
Vi har sett den før, men tåler å få figuren på nytt:
f <- rapRegTemplate::makeHist(df = mtcars, var = params$var, bins = params$bins, makeTable = FALSE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.