Ruby 初心者スレッド Part 30

Ruby 初心者スレッド ..

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

222:デフォルトの名無しさん
 09/08/18 23:07:58 
require 'pp' 
ary = %w(w1 w2 w3 w4 w2 w3 w1 w1 w5 w2 w3 w4) 
zero = ary.uniq.inject(Hash.new){|h,w| h[w] = 0 ; h }  
window = 6 
hout = Hash.new 
ary.each_with_index do |key,i|  
　(hout[key] = zero.dup).delete(key) unless hout.key?(key) 
　ary[i+1,window].select{|e| e != key }.each {|word| hout[key][word] += 1 } 
end

223:チンパンジー愛ちゃん
 09/08/18 23:25:03 
核と思われる部分だけを抜き出すとこんなことになるんだけど、 
問題をうまくまとめれてないんじゃない？ 
もうちょっと整理してから再度質問して。 
 
require 'pp' 
ary = %w(w1 w2 w3 w4 w2 w3 w1 w1 w5 w2 w3 w4) 
window =6 
 
ary.size.times { |i| 
  j = i + 1 
  p [":ary[#{j},#{window}]", ary[j, window]] 
} 
t217.3.rb [utf-8][unix] 
:!ruby t217.3.rb 
[":ary[1,6]", ["w2", "w3", "w4", "w2", "w3", "w1"]] 
[":ary[2,6]", ["w3", "w4", "w2", "w3", "w1", "w1"]] 
[":ary[3,6]", ["w4", "w2", "w3", "w1", "w1", "w5"]] 
[":ary[4,6]", ["w2", "w3", "w1", "w1", "w5", "w2"]] 
[":ary[5,6]", ["w3", "w1", "w1", "w5", "w2", "w3"]] 
[":ary[6,6]", ["w1", "w1", "w5", "w2", "w3", "w4"]] 
[":ary[7,6]", ["w1", "w5", "w2", "w3", "w4"]] 
[":ary[8,6]", ["w5", "w2", "w3", "w4"]] 
[":ary[9,6]", ["w2", "w3", "w4"]] 
[":ary[10,6]", ["w3", "w4"]] 
[":ary[11,6]", ["w4"]] 
[":ary[12,6]", []]

次ページ