False Discovery Rate

Computes false discovery rate from two PDAG caugi::caugi objects. It converts the caugi::caugi objects to adjacency matrices and computes false discovery rate as FP/(FP + TP), where FP are false positives and TP are truth positives. If FP + TP = 0, 1 is returned. Only supports caugi::caugi objects with these edge types present -->, <-->, --- and no edge.

Usage

fdr(truth, est, type = c("adj", "dir"))

Arguments

truth

A caugi::caugi object representing the truth graph.

est

A caugi::caugi object representing the estimated graph.

type

Character string specifying the comparison type:

• "adj": adjacency comparison.

• "dir": orientation comparison conditional on shared adjacencies.

Value

A numeric in [0,1].

See also

Other metrics: confusion(), evaluate(), f1_score(), false_omission_rate(), g1_score(), npv(), precision(), recall(), reexports, specificity()

Examples

cg1 <- caugi::caugi(A %-->% B + C)
cg2 <- caugi::caugi(B %-->% A + C)
fdr(cg1, cg2, type = "adj")
#> [1] 0.5
fdr(cg1, cg2, type = "dir")
#> [1] 1