2006-04-07 (Friday) [長年日記]
■ AA折れ線グラフ # Ruby版
about AA折れ線グラフ(ans.) via (404 Blog Not Found , Roccoの日記)
Rubyで書いてみました．
#!/usr/bin/env ruby
data = ARGV.shift.tr('R', '/').tr('F', '\\').tr('C', '_')
canvas = Hash.new(Hash.new(' '))
for x in 0...data.length do
y = eval(data[0..x].gsub(/\/$/, '+0').gsub('/', '+1').gsub('\\', '-1').gsub('_', '+0')).to_i
canvas[y] = Hash.new(' ') unless canvas.key?(y)
canvas[y][x] = data[x].chr
end
canvas.keys.max.downto(canvas.keys.min) do |y|
for x in 0...data.length do
print canvas[y][x]
end
puts ''
end
% ruby aaplot.rb RCRFCRFFCCRFFRRCRRCCFRFRFF
__
/ \/\/\
_/\_/\ _/ \
/ \__/\ /
\/
ちょっｗｗｗRubyらしさのかけらもねぇｗｗｗ
evalの部分は自分で書いてて激しくワロタｗｗｗ 超富豪的なプログラミングｗｗｗ
まぁ，プログラムも十人十色ということですな． one of the Rubyistsということでお願いします．
[]
[http://taka.no32.tk/diary/20060407.html#p01:title] やるべし！ うはは，僕のレベルがばれてしまう(笑)((time:46:02)) でも辞書(ディクショナリ)ってこんな風に使えるって例ぐらいにはなるか？
本日のPingbacks(全0件)
リンク、どうもです。<br>今週は頭が痛くて、なんか冴えないのですが、冴えていても同じようなプログラムしか書けないような気がします。(w<br><br>ちょっと awk は余計なことをしてしまっていますね。(^^;
どもども．このプログラムも字面はきれいな感じがしますけども，裏ではかなりムダな動きをするプログラムですねぇ．<br>効率的なものは他の方におまかせして，ちょっと風変わりなものを作ってみました．