Gaussianグラフィカルモデルを描く方法R

Question

私は相関係数行列Rと部分相関係数行列Rpを得ました。次に、Rでガウスモデルをどのように描くことができますか？

Gaussianグラフィカルモデルについていくつかの本を紹介することを推奨しても、実際には何か分かりませんが、最初にやる必要があるのはそれを引き出すことです。どうもありがとう！

#the Correlation coefficient matrix 
R=c(1,0.55,0.55,0.41,0.39,0.55,1,0.61,0.49,0.44,0.55,0.61,1,0.71, 
0.66,0.41,0.49,0.71,1,0.61,0.39,0.44,0.66,0.61,1) 
dim(R)=c(5,5) 

#the Partial correlation coefficient matrix 
library("corpcor") 
Rp=cor2pcor(R) 

次に、ガウスのグラフィカルモデルをどのように描画できますか？

Answer 1

対応するグラフをプロットする場合は、igraphパッケージを使用できます。

library(igraph) 
g <- graph.adjacency(abs(Rp)>.1, mode="undirected", diag=FALSE) 
plot(g, layout=layout.fruchterman.reingold) 

Answer 2

「Gaussianグラフィカルモデル」という用語には慣れていませんが、私はそうすべきだと感じています（感謝します）。

しかし、（部分的な）相関行列を視覚化するには、これを行うように設計されたqgraphパッケージを使用することができます。たとえば：偏相関を計算

library("qgraph") 
qgraph(round(Rp,5),edge.labels=TRUE) 

は引数で構築されています：

qgraph(round(R,5),edge.labels=TRUE,graph="concentration") 

は同じ結果を与えます。