polog

Tk
http://search.cpan.org/~ni-s/Tk-804.027/
http://hibiki.miyagi-ct.ac.jp/~suzuki/comp/perltkdoc/
-fontはTk_GetFontStructの形式じゃなきゃ。まあ要は"type size"でいけるらしい。
面倒なことにlabelを追加するとbindもcoordsも新規に書き出さなきゃ行けない。まあこれは完成。

layout
http://search.cpan.org/~thospel/Graph-Layout-Aesthetic-0.11/lib/Graph/Layout/Aesthetic/Force.pm
Graph::Layout::Aestheticの再配置attributeであるGraph::Layout::Aesthetic::Forceの再配置手法とそのパラメータはネットワークの構造によってチューニングしなけりゃならない。今回はTap手法でネットワーク構造が一定の奴なのでパラメータのパラメータを(ややこしいなおい)node数依存にしてある程度うまく言ったけど、クラスター間の距離を決めるパラとbait-pray間の距離を決めるパラが同じなので(多分)落としどころが難しい。今nodeに適当にべき乗かけてやってるけど、最適にはほど遠いし、かといってクラスター間の距離があまりにつまり過ぎると吹っ飛ぶ(視覚で理解可能なネットワークじゃなくなる)ので、これぐらいが限界かなあ。