# NOT RUN {
# Pearson's correlation only for CRAN checks
A <- TMFG(neoOpen, normal = FALSE)$A
str <- strength(A)
#Directed network
# }
# NOT RUN {
dep <- depend(neoOpen)
Adep <- TMFG(dep, depend = TRUE)$A
str <- strength(Adep)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab