inst/charts/8.R

In NicolasJBM/writer: Functions and interfaces to support academic writing with R

library(tibble)
library(dplyr)
library(ggplot2)
library(plotly)

chart <- plotly::plot_ly(
  type = 'parcoords', line = list(color = 'blue'),
  dimensions = list(
   list(range = c(1,5),
        constraintrange = c(1,2),
        label = 'A', values = c(1,4,4.5)),
   list(range = c(1,5),
        tickvals = c(1.5,3,4.5),
        label = 'B', values = c(3,1.5,3)),
   list(range = c(1,5),
        tickvals = c(1,2,4,5),
        label = 'C', values = c(2,4,4.5),
        ticktext = c('text 1', 'text 2', 'text 3', 'text 4')),
   list(range = c(1,5),
        label = 'D', values = c(4,2,4))
  )
)