sg_progress.Rd
Add text to your graph.
sg_progress(sg, data, delay, text, ..., position = "top", id = NULL, tag = htmltools::span, cumsum = TRUE)
sg | An object of class |
---|---|
data | Data.frame holding |
delay | Delay, in milliseconds at which text should appear. |
text | Text to appear on graph. |
... | Content of the button, complient with |
position | Position of button, |
id | A valid CSS id. |
tag | A Valid tags function. |
cumsum | Whether to compute the cumulative sum on the |
The element
is passed to Document.createElement()
and therefore takes any valid tagName
, including, but not limited to; p
, h1
, div
.
# initial nodes nodes <- sg_make_nodes() # additional nodes nodes2 <- sg_make_nodes() nodes2$id <- as.character(seq(11, 20)) # add delay nodes2$delay <- runif(nrow(nodes2), 500, 1000) nodes2$text <- seq.Date(Sys.Date(), Sys.Date() + 9, "days") sigmajs() %>% sg_nodes(nodes, id, label, size, color) %>% sg_add_nodes(nodes2, delay, id, label, size, color) %>% sg_progress(nodes2, delay, text, element = "h3") %>% sg_button(c("add_nodes", "progress"), "add")