Learn R Programming

echarts4r (version 0.2.0)

e_highlight_p: Highlight & Downplay Proxy

Description

Proxies to highlight and downplay series.

Usage

e_highlight_p(proxy, series_index = NULL, series_name = NULL)

e_downplay_p(proxy, series_index = NULL, series_name = NULL)

Arguments

proxy

An echarts4r proxy as returned by echarts4rProxy.

series_index

Series index, can be a vector.

series_name

Series Name, can be vector.

Examples

Run this code
# NOT RUN {
  library(shiny)

 ui <- fluidPage(
   fluidRow(
     column(
       3,
       actionButton("highlightmpg", "Highlight MPG")
     ),
     column(
       3,
       actionButton("highlighthp", "Highlight HP")
     ),
     column(
       3,
       actionButton("downplaympg", "Downplay MPG")
     ),
     column(
       3,
       actionButton("downplayhp", "Downplay HP")
     )
   ),
   echarts4rOutput("plot")
 ) 
 
 server <- function(input, output, session){
   output$plot <- renderEcharts4r({
     mtcars %>% 
       e_charts(mpg) %>% 
       e_line(disp) %>% 
       e_line(hp, name = "HP") # explicitly pass name
   })
   
   # highlight
   
   observeEvent(input$highlightmpg, {
     echarts4rProxy("plot") %>% 
       e_highlight_p(series_index = 0) # using index
   })
   
   observeEvent(input$highlighthp, {
     echarts4rProxy("plot") %>% 
       e_highlight_p(series_name = "HP") # using name
   })
   
   # downplay
   
   observeEvent(input$downplaympg, {
     echarts4rProxy("plot") %>% 
       e_downplay_p(series_name = "disp")
   })
   
   observeEvent(input$downplayhp, {
     echarts4rProxy("plot") %>% 
       e_downplay_p(series_index = 1)
   })
 }
 
 shinyApp(ui, server)

# }
# NOT RUN {
# }

Run the code above in your browser using DataLab