Description Usage Arguments Details Value Events Note Examples
Add buttons to your graph.
1 2 3 4 5 6 7 8 9 |
sg |
An object of class |
event |
Event the button triggers, see valid events. |
... |
Content of the button, complient with |
position |
Position of button, |
class |
Button |
tag |
A Valid |
id |
A valid CSS id. |
You can pass multiple events as a vector, see examples. You can also pass multiple buttons.
An object of class htmlwidget
which renders the visualisation on print.
force_start
force_stop
noverlap
drag_nodes
relative_size
add_nodes
add_edges
drop_nodes
drop_edges
animate
export_svg
export_img
progress
read_exec
The default class (btn btn-default
) works with Bootstrap 3 (the default framework for Shiny and R markdown).
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 | nodes <- sg_make_nodes()
edges <- sg_make_edges(nodes)
# Button starts the layout and stops it after 3 seconds
sigmajs() %>%
sg_nodes(nodes, id, size) %>%
sg_edges(edges, id, source, target) %>%
sg_force_start() %>%
sg_force_stop(3000) %>%
sg_button(c("force_start", "force_stop"), "start layout")
# additional nodes
nodes2 <- sg_make_nodes()
nodes2$id <- as.character(seq(11, 20))
# add delay
nodes2$delay <- runif(nrow(nodes2), 500, 1000)
sigmajs() %>%
sg_nodes(nodes, id, label, size, color) %>%
sg_add_nodes(nodes2, delay, id, label, size, color) %>%
sg_force_start() %>%
sg_force_stop(3000) %>%
sg_button(c("force_start", "force_stop"), "start layout") %>%
sg_button("add_nodes", "add nodes")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.