gRbase (version 1.8-6.7)

graph-randomdag: Random directed acyclic graph

Description

Generate a random directed acyclic graph (DAG)

Usage

random_dag(V, maxpar = 3, wgt = 0.1)

Arguments

V

The set of vertices.

maxpar

The maximum number of parents each node can have

wgt

A parameter controlling how likely it is for a node to have a certain number of parents; see 'Details'.

Value

A graphNEL object.

Details

If the maximum number of parents for a node is, say 3 and wgt=0.1, then the probability of the node ending up with 0,1,2,3 parents is proportional to 0.1^0, 0.1^1, 0.1^2, 0.1^3.

Examples

# NOT RUN {
dg   <- random_dag(1:1000, maxpar=5, wgt=.9)
table(sapply(vpar(dg),length))

dg   <- random_dag(1:1000, maxpar=5, wgt=.5)
table(sapply(vpar(dg),length))

dg   <- random_dag(1:1000, maxpar=5, wgt=.1)
table(sapply(vpar(dg),length))

# }