Chinaunix

标题: [练习] 合并 [打印本页]
作者: rubyish    时间: 2013-11-26 01:25
标题: [练习] 合并
挑一些运动量小的练习练习~{:3_188:}
合并
from:

0 0 1 0 0 1 0 0
1 0 0 0 0 0 0 1
0 0 1 0 0 1 0 1
0 1 0 0 0 1 0 0
1 0 0 0 0 0 0 0
0 0 1 1 0 1 1 0
1 0 1 1 0 1 1 0
0 0 0 0 1 0 0 0
0 0 1 0 0 0 1 0
0 0 1 1 1 1 1 1

to:
0 0 1 0 0 2 0 0
3 0 0 0 0 0 0 4
0 0 5 0 0 6 0 4
0 5 0 0 0 6 0 0
5 0 0 0 0 0 0 0
0 0 7 7 0 7 7 0
8 0 7 7 0 7 7 0
0 0 0 0 7 0 0 0
0 0 9 0 0 0 9 0
0 0 9 9 9 9 9 9

作者: rubyish    时间: 2013-11-26 01:38
本帖最后由 rubyish 于 2013-11-27 20:43 编辑

v2:{:3_188:}
  1. #!/usr/bin/ruby -w
  2. nteam     = 1
  3. hregister = Hash.new {|h, k| h[k] = [] }
  4. hdata     = Hash.new {|h, k| h[k] = Hash.new 0 }

  6. DATA.each_with_index do |l, i|
  7.   l.split.each_with_index do |e, j|
  8.     e == ?0 and hdata[i][j] = 0 and next
  9.     *asite = [i, j-1], [i-1, j-1], [i-1, j], [i-1, j+1]
  10.     nbuddy, ngang = asite.reject {|r| r[0] < 0 }.
  11.       map {|x, y| hdata[x][y] }.reject(&:zero?).uniq.sort
  12.     nbuddy ||= ( nteam += 1 ) - 1
  13.    
  14.     [[i, j], *hregister[ngang]].each do |a, b|
  15.       hdata[a][b] = nbuddy
  16.       hregister[nbuddy] << [a, b]
  17.     end
  18.     hregister.delete ngang
  19.   end
  20. end

  22. hregister.each_with_index do |r, i|
  23.   r[1].each {|x, y| hdata[x][y] = i + 1 }
  24. end

  26. hdata.each_value {|v| puts v.values * ?\s }

  28. __END__
  29. 0 0 1 0 0 1 0 0
  30. 1 0 0 0 0 0 0 1
  31. 0 0 1 0 0 1 0 1
  32. 0 1 0 0 0 1 0 0
  33. 1 0 0 0 0 0 0 0
  34. 0 0 1 1 0 1 1 0
  35. 1 0 1 1 0 1 1 0
  36. 0 0 0 0 1 0 0 0
  37. 0 0 1 0 0 0 1 0
  38. 0 0 1 1 1 1 1 1
复制代码
作者: Sevk    时间: 2013-11-26 20:39
提示: 作者被禁止或删除 内容自动屏蔽



欢迎光临 Chinaunix (http://bbs.chinaunix.net/) Powered by Discuz! X3.2