div( navbar( .style %>% background("dark") %>% font("light") %>% margin(bottom = 3), brand = "Navbar" ), p("Cras mattis consectetur purus sit amet fermentum. Donec sed ", "odio dui. Lorem ipsum dolor sit amet, consectetur adipiscing ", "elit. Aenean eu leo quam. Pellentesque ornare sem lacinia quam ", "venenatis vestibulum.") )
div( buttonInput( .style %>% margin(2) %>% shadow("small"), # <- id = NULL, label = "Small" ), buttonInput( .style %>% margin(2) %>% shadow("medium"), # <- id = NULL, label = "Medium" ), buttonInput( .style %>% margin(2) %>% shadow("large"), # <- id = NULL, label = "Large" ) )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.