GraphAzでアナグラムをビジュアライズしたよ

この前Rubyで単語のアナグラムを見つけるAnagramライブラリを書いたよ。

でもやっぱりアナグラムを単にターミナルに出力するだけじゃつまらないよね。

で、以前に作ったruby-graphvizをラップするGraphAzを思い出したよ。

それで最も組数の多いアナグラム上位5組をGraphAzでビジュアライズしてみたら、なんかきれいだったので、コードと共にここに貼っておくよ。円の中心がアナグラムのシグネチャで、周囲がそのシグネチャを持った単語だよ。

上位100組だとお花畑になるよ。

require "graphaz" require_relative "anagram" mosts = Anagram.new.most(:size => 5, :sign => true) ga = GraphAz.new("Anagram", :use => "neato") ga.gnode[:shape] = "circle" mosts.each do |sign, words| words.each { |word| ga.add "#{sign} => #{word}" } end C = [[:darkgreen, :green], [:blue, :skyblue], [:red, :lightpink], [:darkviolet, :magenta], [:yellow, :palegoldenrod]] mosts.each_with_index do |(sign, words), i| i = i % C.size ga.node("#{sign}", :shape => 'doublecircle', :style => 'filled', :fillcolor => C[i][0]) words.each { |word| ga.node(word, :style => 'filled', :fillcolor => C[i][1]) } end # ga.print_graph(:png => "anagram.png") ga.print_graph(:dot => "anagram.dot")

(追記:2011-12-12) 100組のイメージを追加を追加しました。

blog comments powered by Disqus

100円〜で好評発売中！
M'ELBORNE BOOKS