Fork me on GitHub
In R console or R markdown documents
library(timevis)

data <- data.frame(
  id      = 1:4,
  content = c("Item one", "Item two",
              "Ranged item", "Item four"),
  start   = c("2016-01-10", "2016-01-11",
              "2016-01-20", "2016-02-14 15:00:00"),
  end     = c(NA, NA, "2016-02-04", NA)
)

timevis(data)
In Shiny apps
library(shiny)
library(timevis)

data <- data.frame(
  id      = 1:4,
  content = c("Item one", "Item two",
              "Ranged item", "Item four"),
  start   = c("2016-01-10", "2016-01-11",
              "2016-01-20", "2016-02-14 15:00:00"),
  end     = c(NA, NA, "2016-02-04", NA)
)

ui <- fluidPage(
  timevisOutput("timeline")
)

server <- function(input, output, session) {
  output$timeline <- renderTimevis({
    timevis(data)
  })
}

shinyApp(ui = ui, server = server)
The exact code for all the timelines in this app is on GitHub
The exact code for all the timelines in this app is on GitHub
The exact code for all the timelines in this app is on GitHub
The exact code for all the timelines in this app is on GitHub

Actions:

Data:


Visible window:
Selected items:
The exact code for all the timelines in this app is on GitHub
More apps by Dean