## Not run: ------------------------------------
# g.lm <- brainGraph_GLM(c(g.norm[[1]][[6]], g.norm[[2]][[6]]),
# measure='strength',
# covars=covars.all[Group == groups[2],
# c(names(covars.dti)[-2], 'Age.Fontan'),
# with=F]
# con.vec=c(0, 0, 0, 1))
#
# # Test for the group diff between "Neonate" and "Non-Neonate" in nodal eff.
# covars <- covars.all[Group == groups[2] & tract == 1,
# c(names(covars.dti)[-2], 'Age.op1.cat'), with=F]
# covars[, Age.op1.cat := factor(Age.op1.cat)]
# g.lm <- brainGraph_GLM(g.norm[[2]][[6]], measure='E.nodal.wt',
# covars=covars, con.vec=c(0, 0, 0, 0, 1))
## ---------------------------------------------
Run the code above in your browser using DataLab