[掲示板へもどる]
一括表示

  [No.595] 共起ネットワークの元データ表出力 投稿者:水野  投稿日:2010/02/12(Fri) 01:49:27

はじめまして、水野といいます。
最近、本ツールのことを知り、使い始めたばかりです。

基本的なことで申し訳ありませんが教えていただきたく。

共起ネットワークの元になっているデータ表(語と語の共起頻度表
やJaccard係数表)を出力したいのですが何か方法はあるでしょうか?

ネットワークの描画結果だけでなく、どのような共起状況になって
いるかをデータでも確認しておきたいものですから。

すみませんがよろしくお願いします。


  [No.596] 《質問補足》共起ネットワークの元データ表出力 投稿者:水野  投稿日:2010/02/12(Fri) 02:04:48

先に質問した、水野です。
質問の補足をさせていただきます。

共起ネットワークの描画に使ったデータ出力は、別のスレッドに
出力方法が載っていました。しかし、描画条件に合わず
(係数の順位や閾値)に描画されない語(ノード)に
関するデータも含めて出力する方法は載っていないようでしたので、
質問させていただきました。


  [No.597] Re: 《質問補足》共起ネットワークの元データ表出力 投稿者:HIGUCHI Koichi  投稿日:2010/02/12(Fri) 10:41:39

こんにちは、樋口です。書き込みありがとうございます。

お書きいただいたとおり、こちらのスレッドの方法で、共起ネットワー
クの描画に使ったデータは出力できます。
http://khcoder.info/cgi-bin/bbs_khn/khcf.cgi?no=551&mode=allread

描画されなかったものも含めてすべての共起関係を出力するには、コマ
ンドを以下のように変更して下さい。
----------------------------------------------------------------------
ep <- data.frame(
n1 = colnames(d)[ as.numeric( get.edgelist(n,name=T)[,1] ) ],
n2 = colnames(d)[ as.numeric( get.edgelist(n,name=T)[,2] ) ],
weight = get.edge.attribute(n, "weight"),
stringsAsFactors = FALSE )

ep <- ep[ sort.list(ep$weight, decreasing=TRUE), ]
rownames(ep) <- c(1:nrow(ep))
ep
----------------------------------------------------------------------

データのファイル出力に関しては、上記スレッドと同じコマンドで可能
です。

どうぞよろしくお願いいたします。


  [No.598] Re: 《質問補足》共起ネットワークの元データ表出力 投稿者:水野  投稿日:2010/02/12(Fri) 16:45:06

樋口様。

水野です。
丁寧なご教示、ありがとうございます。
早速試してみましたら、問題なく出来ました。

重ねて、ありがとうございました。