Skip to content

Commit

Permalink
small update
Browse files Browse the repository at this point in the history
  • Loading branch information
James-Thorson-NOAA committed Apr 15, 2024
1 parent 2d7274a commit b1c86bb
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion R/dsem.R
Original file line number Diff line number Diff line change
Expand Up @@ -873,9 +873,10 @@ logLik.dsem <- function(object, ...) {
as_fitted_DAG <-
function( fit,
lag = 0,
what = "Estimate",
what = c("Estimate","Std_Error","p_value"),
direction = 1 ){

what = match.arg(what)
coefs = summary( fit )
coefs = coefs[ which(coefs[,2]==lag), ]
coefs = coefs[ which(coefs[,'direction'] %in% direction), ]
Expand Down

0 comments on commit b1c86bb

Please sign in to comment.