View source: R/bulma-timeline.R
| bulmaTimeline | R Documentation | 
Create a timeline container https://wikiki.github.io/components/timeline/.
bulmaTimeline(..., centered = FALSE, rtl = FALSE)
... | 
 Slot for bulmaTimelineHeader and bulmaTimelineItem.  | 
centered | 
 FALSE by default. Whether to center the timeline.  | 
rtl | 
 FALSE by default. If rtl is TRUE, the timeline is displayed
right to left. If   | 
known problem: when centered is TRUE, lines cannot be colored.
David Granjon, dgranjon@ymail.com
if (interactive()) {
 library(shiny)
 ui <- bulmaPage(
  bulmaContainer(
   # centered timeline
   bulmaTimeline(
    centered = TRUE,
    bulmaTimelineHeader(text = "Start", size = "medium", color = "primary"),
    bulmaTimelineItem(
      color = "primary", marker_color = "primary",
      marker_image = FALSE, marker_icon = FALSE,
      content_header = "January 2016",
      content_body = "Timeline content - Can include any HTML element"
    ),
    bulmaTimelineItem(
      color = "warning", marker_color = "warning",
      marker_image = TRUE, marker_image_size = "32x32", marker_icon = FALSE,
      content_header = "February 2016",
      content_body = "Timeline content - Can include any HTML element",
      tags$img(src = "http://bulma.io/images/placeholders/32x32.png")
    ),
    bulmaTimelineHeader(text = "2017", size = NULL, color = "primary"),
    bulmaTimelineItem(
      color = "danger", marker_color = "danger",
      marker_image = FALSE, marker_icon = TRUE,
      content_header = "March 2016",
      content_body = "Timeline content - Can include any HTML element",
      tags$i(class = "fa fa-flag")
    ),
    bulmaTimelineHeader(text = "End", size = "medium", color = "primary")
    )
  )
 )
 server <- function(input, output, session) {
 }
 shinyApp(ui = ui, server = server)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.