4.5. Correlation graph

library(qgraph)
data(mtcars)
dim(mtcars)

## [1] 32 11

qgraph(cor(mtcars[,c(1:8)]))

#изменение положения
qgraph(cor(mtcars[,c(1:8)]), layout = "spring")

#ограничение связи на 50%
qgraph(cor(mtcars[,c(1:8)]), layout = "spring", minimum=0.5)

#изменение цветов в кружочках
qgraph(cor(mtcars[,c(1:8)]), layout = "spring", minimum=0.5, color = c("lightblue", "darkblue", "slateblue"))

#изменение цветов в линиях
qgraph(cor(mtcars[,c(1:8)]), layout = "spring", minimum=0.5, color = c("lightblue", "darkblue", "slateblue"), edge.color = c("darkgray", "darkred"))