Skip to contents

Finds the 'core graph', i.e., those edges that are present in all of the estimated graphs

Usage

find_core_graph(cvn)

Arguments

cvn

A cvn object

Value

A list of adjacency matrix, one for each value of (lambda1, lambda2)

Examples

path <- system.file("cvnfit.RData", package = "CVN")
load(path)
find_core_graph(fit) 
#> [[1]]
#>       [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
#>  [1,]    0    0    0    0    1    0    0    0    0     0
#>  [2,]    0    0    0    0    0    0    0    0    0     0
#>  [3,]    0    0    0    0    0    0    0    0    0     0
#>  [4,]    0    0    0    0    0    0    0    0    0     0
#>  [5,]    1    0    0    0    0    0    0    0    0     0
#>  [6,]    0    0    0    0    0    0    0    0    0     0
#>  [7,]    0    0    0    0    0    0    0    0    0     0
#>  [8,]    0    0    0    0    0    0    0    0    0     0
#>  [9,]    0    0    0    0    0    0    0    0    0     0
#> [10,]    0    0    0    0    0    0    0    0    0     0
#>