Get the diffusion vector — get_diffusion

Returns the diffusion vector if you ran tied_diffusion() or diffuse_seed_nodes().

Usage

get_diffusion_vector(object)

Arguments

object: The underlying class NetworkDiffusions().

Value

The diffusion vector if found. If you did not run either diffusion functions, it will return NULL and a warning.

Examples

# diffusion scores after a single seed node diffusion
set.seed(42)
g <- igraph::sample_pa(15, directed = FALSE)
edges <- data.table::setDT(igraph::as_data_frame(g))[, `:=`(
  from = sprintf("node_%i", from),
  to = sprintf("node_%i", to)
)]
object <- NetworkDiffusions(edges, weighted = FALSE, directed = FALSE)
object <- diffuse_seed_nodes(object, c(node_1 = 1, node_3 = 1), "max")
head(get_diffusion_vector(object))
#>     node_1     node_2     node_3     node_4     node_6     node_7 
#> 0.12792857 0.24907561 0.15054927 0.10645037 0.04364123 0.03541402