sg_change_nodes_p

0th

Percentile

Change

Change nodes and edges attributes on the fly

Usage
sg_change_nodes_p(proxy, data, value, attribute, rate = c("once",
  "iteration"), refresh = TRUE)

sg_change_edges_p(proxy, data, value, attribute, rate = c("once", "iteration"), refresh = TRUE)

Arguments
proxy

An object of class sigmajsProxy as returned by sigmajsProxy.

data

data.frame holding delay column.

value

Column containing value.

attribute

Name of attribute to change.

rate

Rate at chich to refresh takes once refreshes once after all values have been changed, and iteration which refreshes at every iteration.

refresh

Whether to refresh the graph after the change is made.

Aliases
  • sg_change_nodes_p
  • sg_change_edges_p
Examples
# NOT RUN {
library(shiny)

nodes <- sg_make_nodes()
nodes$new_color <- "red"
edges <- sg_make_edges(nodes)

ui <- fluidPage(
  actionButton("start", "Change color"), 
  sigmajsOutput("sg")
) 

server <- function(input, output){

  output$sg <- renderSigmajs({
    sigmajs() %>%
      sg_nodes(nodes, id, size, color) %>%
      sg_edges(edges, id, source, target)
  })

  observeEvent(input$start, {
    sigmajsProxy("sg") %>% # use sigmajsProxy!
      sg_change_nodes_p(nodes, new_color, "color")
  })

}

 if(interactive()) shinyApp(ui, server) # run

# }
Documentation reproduced from package sigmajs, version 0.1.3, License: MIT + file LICENSE

Community examples

Looks like there are no examples yet.