こんにちは、樋口です。書き込みありがとうございます。
このような方法で、共起ネットワークに描かれている共起関係の強さを
リストアップすることができます。
http://khcoder.info/cgi-bin/bbs_khn/khcf.cgi?no=551&mode=allread
あるいは、当該ページの説明の(5)で、以下のコマンドを貼り付けて
実行すると、共起関係の強さを線の太さに反映させることができます。
こによって、添付画像のような結果が得られます。得られた図の上で
右クリックすることで、画像としてコピー／保存できます。
-------------------------------------------------------------------------------
edg_width <- el2[,3]
edg_width <- edg_width / sd( edg_width )
edg_width <- edg_width - mean( edg_width )
edg_width <- edg_width * 0.8 + 2 # 分散 = 0.8, 平均 = 2
plot.igraph(n2,
vertex.label =colnames(d)[ as.numeric( get.vertex.attribute(n2,"name") ) ],
vertex.label.cex =cex,
vertex.label.color ="black",
vertex.label.family= "",
vertex.color =ccol,
vertex.frame.color =com_col_v,
edge.color =edg_col,
edge.lty =edg_lty,
edge.width =edg_width,
layout =lay_f)
-------------------------------------------------------------------------------
「# 分散 = 0.8, 平均 = 2」というコメントがついている行の数字
を編集することで、線の太さや、変化の大きさに味付けできます。
なお次のバージョンのKH Coderでは、以下の2つのオプションを共起
ネットワークに追加することを検討しています。
・出現数の多い語ほど大きく描画
・強い共起関係ほど太く描画
リリースは少し先になるかと思いますが、こちらもよろしくお願い
いたします。
|