"GaussL0penObsScore"
ges
."Score "
, directly.
All reference classes extend and inherit methods from "envRefClass "
.GaussL0penObsScore
has the same fields as
Score
. They need not be accessed by the user.lambda
in the constructor) times the number of
parameters of the DAG model. By default, the constant $\lambda$ is
chosen as $\log(n)/2$, which corresponds to the BIC score.ges
,
GaussL0penIntScore
,
Score
##################################################
## Using Gaussian Data
##################################################
## Load predefined data
data(gmG)
## Define the score object
score <- new("GaussL0penObsScore", gmG$x)
## Score of the true underlying DAG
score$global.score(as(gmG$g, "GaussParDAG"))
## Score of the DAG that has only one edge from 1 to 2
A <- matrix(0, ncol(gmG$x), ncol(gmG$x))
A[1, 2] <- 1
score$global.score(as(A, "GaussParDAG"))
## (Note: this is lower than the score of the true DAG.)
Run the code above in your browser using DataLab