まつ本/Pajek形式データいじりツール
の編集
https://floss-lab.org/pukiwiki/?%E3%81%BE%E3%81%A4%E6%9C%AC/Pajek%E5%BD%A2%E5%BC%8F%E3%83%87%E3%83%BC%E3%82%BF%E3%81%84%E3%81%98%E3%82%8A%E3%83%84%E3%83%BC%E3%83%AB
[
トップ
] [
編集
|
差分
|
履歴
|
添付
|
リロード
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
]
-- 雛形とするページ --
(no template pages)
[[まつ本]]~ [[ろぎ/Pajek形式データいじりツール]]~ #contents **2つのmboxからメトリクスを収集,砂時計を書きたい人用 [#z13057de] +(必要であれば)mboxに記載されているメールアドレスに置換ルールを適用 --&attachref(replaceMAddressUsingRuleList.pl); ---[入力]~ 生mbox~ 整形ルール表~ ---[出力]~ 置換済みmbox~ ---[サンプル]~ > cat replaceRule.txt 置換対象 置換後 joshua@slive.com @gmail.com shinsuke-m@a.com matumoto-s@b.com > perl replaceMAddressUsingRuleList.pl dev_200111 replaceRule.txt > dev_200111~ +mboxから3ヶ月窓でnetを作成 --&attachref(getRelationWithCluster.pl); from まえし; ---[入力]~ mbox1~ mbox2~ mbox3~ ---[出力]~ net ---[サンプル]~ > perl getRelationWithCluster.pl dev_200110 dev_200111 dev_200112 > dev_200110.net +2つのnetを共通アドレスでマージ --&attachref(mergeNetworksByName_v2.pl); ---[入力]~ net1~ net2~ ---[出力]~ マージ済みpaj~ ---[サンプル]~ > perl mergeNetworksByName_v2.pl dev_200110.net user_200110.net > merge_200110.paj +pajファイルから媒介フロー次数を記したvecを作成(現在は使わないメトリクス) --&attachref(coordinator_metrics.pl); ---[入力]~ paj~ ---[出力]~ メトリクスを列挙したvec ---[サンプル]~ > perl coordinator_metrics.pl merge_200111.paj +中心性の収集(pajek マクロにて実装) --&attachref(batches.zip); ---[入力]~ paj~ ---[出力]~ vec~ ---[サンプル]~ pajekにマクロを食わせるだけ. ただしファイルの絶対パスを適切なものに書き換える必要あり +4,5で作成した各メトリクスをxlsにまとめる --&attachref(correctMetricsUniq.pl); ---[入力]~ 計算対象となったpaj~ メトリクスを記したvec~ メトリクスを記したvec~ メトリクスを記したvec~ ... ---[出力]~ xls ---[サンプル]~ perl correctMetricsUniq.pl merge_200111.paj degree_input_200111.vec degree_output_200111.vec degree_all_200111.vec ... > +プロット(Rにて実装) --ファイル読み込み時の絶対パスは決め打ちなので,適切なものに書き換える必要有り~ --&attachref(readfiles.r); データの取り込み~ --&attachref(plotAverage.r); メトリクスの上位10%の平均の推移を描画~ --&attachref(plotAverage_top5coordinator.r); トップの5コーディネータの順位グラフを描画~ --手順 +++readfiles.rの絶対パスの書き換え +++R起動 +++Rウィンドウにreadfiles.rをD&D +++RウィンドウにcorrectAverage.rをD&D +砂時計データ(TopNコーディネータを強調したpajファイル)の作成~~ --&attachref(makeSandglass.pl); ---[入力]~ paj~ 強調対象のtopNコーディネータを列挙したtxtファイル~ ---[出力]~ paj~ ---[サンプル]~ > cat top5.txt "jslive@gmail.com" "wrowe@rowe-clan.net" "nick@.." > perl makeSandglass.pl merge_200111.paj top5.txt > merge_200111_emp.paj
タイムスタンプを変更しない
[[まつ本]]~ [[ろぎ/Pajek形式データいじりツール]]~ #contents **2つのmboxからメトリクスを収集,砂時計を書きたい人用 [#z13057de] +(必要であれば)mboxに記載されているメールアドレスに置換ルールを適用 --&attachref(replaceMAddressUsingRuleList.pl); ---[入力]~ 生mbox~ 整形ルール表~ ---[出力]~ 置換済みmbox~ ---[サンプル]~ > cat replaceRule.txt 置換対象 置換後 joshua@slive.com @gmail.com shinsuke-m@a.com matumoto-s@b.com > perl replaceMAddressUsingRuleList.pl dev_200111 replaceRule.txt > dev_200111~ +mboxから3ヶ月窓でnetを作成 --&attachref(getRelationWithCluster.pl); from まえし; ---[入力]~ mbox1~ mbox2~ mbox3~ ---[出力]~ net ---[サンプル]~ > perl getRelationWithCluster.pl dev_200110 dev_200111 dev_200112 > dev_200110.net +2つのnetを共通アドレスでマージ --&attachref(mergeNetworksByName_v2.pl); ---[入力]~ net1~ net2~ ---[出力]~ マージ済みpaj~ ---[サンプル]~ > perl mergeNetworksByName_v2.pl dev_200110.net user_200110.net > merge_200110.paj +pajファイルから媒介フロー次数を記したvecを作成(現在は使わないメトリクス) --&attachref(coordinator_metrics.pl); ---[入力]~ paj~ ---[出力]~ メトリクスを列挙したvec ---[サンプル]~ > perl coordinator_metrics.pl merge_200111.paj +中心性の収集(pajek マクロにて実装) --&attachref(batches.zip); ---[入力]~ paj~ ---[出力]~ vec~ ---[サンプル]~ pajekにマクロを食わせるだけ. ただしファイルの絶対パスを適切なものに書き換える必要あり +4,5で作成した各メトリクスをxlsにまとめる --&attachref(correctMetricsUniq.pl); ---[入力]~ 計算対象となったpaj~ メトリクスを記したvec~ メトリクスを記したvec~ メトリクスを記したvec~ ... ---[出力]~ xls ---[サンプル]~ perl correctMetricsUniq.pl merge_200111.paj degree_input_200111.vec degree_output_200111.vec degree_all_200111.vec ... > +プロット(Rにて実装) --ファイル読み込み時の絶対パスは決め打ちなので,適切なものに書き換える必要有り~ --&attachref(readfiles.r); データの取り込み~ --&attachref(plotAverage.r); メトリクスの上位10%の平均の推移を描画~ --&attachref(plotAverage_top5coordinator.r); トップの5コーディネータの順位グラフを描画~ --手順 +++readfiles.rの絶対パスの書き換え +++R起動 +++Rウィンドウにreadfiles.rをD&D +++RウィンドウにcorrectAverage.rをD&D +砂時計データ(TopNコーディネータを強調したpajファイル)の作成~~ --&attachref(makeSandglass.pl); ---[入力]~ paj~ 強調対象のtopNコーディネータを列挙したtxtファイル~ ---[出力]~ paj~ ---[サンプル]~ > cat top5.txt "jslive@gmail.com" "wrowe@rowe-clan.net" "nick@.." > perl makeSandglass.pl merge_200111.paj top5.txt > merge_200111_emp.paj
テキスト整形のルールを表示する
添付ファイル:
getRelationWithCluster.pl
4件
[
詳細
]
readfiles.r
5件
[
詳細
]
batches.zip
2件
[
詳細
]
coordinator_metrics.pl
4件
[
詳細
]
correctMetricsUniq.pl
5件
[
詳細
]
plotAverage_top5coordinator.r
4件
[
詳細
]
makeSandglass.pl
5件
[
詳細
]
mergeNetworksByName_v2.pl
4件
[
詳細
]
correctAverage.r
1件
[
詳細
]
plotAverage.r
4件
[
詳細
]
replaceMAddressUsingRuleList.pl
13件
[
詳細
]