Nothing
## ---- eval=FALSE---------------------------------------------------------
# install.packages("NetworkInference")
## ---- eval=FALSE---------------------------------------------------------
# #install.packages(devtools)
# devtools::install_github('desmarais-lab/NetworkInference')
## ---- results='hide', message=FALSE--------------------------------------
library(NetworkInference)
# Simulate random cascade data
df <- simulate_rnd_cascades(50, n_node = 20)
# Cast data into `cascades` object
## From long format
cascades <- as_cascade_long(df)
## From wide format
df_matrix <- as.matrix(cascades) ### Create example matrix
cascades <- as_cascade_wide(df_matrix)
## ------------------------------------------------------------------------
result <- netinf(cascades, quiet = TRUE, p_value_cutoff = 0.05)
## ---- eval=FALSE---------------------------------------------------------
# head(result)
## ---- results="asis", echo=FALSE-----------------------------------------
pander::pandoc.table(head(result))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.