sg_events {sigmajs}R Documentation

Events

Description

Get events server-side.

Usage

sg_events(sg, events)

Arguments

sg

An object of class sigmajsas intatiated by sigmajs.

events

A vector of valid events (see section below).

Details

Events: Valid events to pass to events.

Value

An object of class htmlwidget which renders the visualisation on print.

See Also

official documentation.

Examples

library(shiny)

nodes <- sg_make_nodes()
edges <- sg_make_edges(nodes)

ui <- fluidPage(
  sigmajsOutput("sg"),
  p("Click on a node"),
  verbatimTextOutput("clicked")
) 

server <- function(input, output){
  output$sg <- renderSigmajs({
    sigmajs() %>%
      sg_nodes(nodes, id, size, color) %>%
      sg_edges(edges, id, source, target) %>% 
      sg_events("clickNode")
  })

# capture node clicked
output$clicked <- renderPrint({
    input$sg_click_node
  })
}

## Not run: shinyApp(ui, server)


[Package sigmajs version 0.1.5 Index]