【お暇な時に】４桁ごとに交互にカウント

Question

Ruby 1.9.3です。

ある変数に半角の0～3のみで構成される、長さが８の倍数の文字列が入っています。
(事前にチェックしていますので、例外は考慮しなくても大丈夫です)

例①(※改行文字は含まれません)
00010000
00000000
20001002
00000013
30000000

その中で、
・４桁ずつ交互に(例①で言う所の左４桁と右４桁ごとに)
・『2』の入っている数×２＋『1』の入っている数
の合計の数字を出したいです。

例②
左４桁＝０(２の数)×２＋５(１の数)＝５
右４桁＝２(２の数)×２＋４(１の数)＝８
00012000
00000001
01013000
00000012
00000010
11000003
00000001

例③
左４桁＝３(２の数)×２＋１(１の数)＝７
右４桁＝２(２の数)×２＋５(１の数)＝９
02022020
00000000
03033030
02001000
00000100
13000010
00000011

例④
左４桁＝０(２の数)×２＋０(１の数)＝０
右４桁＝２(２の数)×１＋８(１の数)＝１０
33330010
33330010
33330010
33330010
00000200
00000001
33330001
33330001
33330301

とりあえず自分は、
元変数を４文字ずつ読み、都度countで調べ変数hidariと変数migiに加算していくといった方法を考えました。
構想的には問題ないと思うのですが、もう少しcountの指定の仕方や
別の関数を使用したりして、スマートに出来ないかと思った次第です。

hensu = "021000000000000002000000000021001000000003000001"
hidari = 0
for i in 1..hensu.length / 8
	tmp = hensu[(i-1)*8..(i-1)*8+3]
	hidari += tmp.count("2") * 2 + tmp.count("1")
end
migi = 0
for i in 1..hensu.length / 8
	tmp = hensu[(i-1)*8+4..(i-1)*8+7]
	migi += tmp.count("2") * 2 + tmp.count("1")
end
p hidari
p migi

＜蛇足？＞
①大雑把ですが 1500～2500桁程度のデータが多いです。
②元文字列の ７～９割は"0"になると思われます。

以上、
もう少しわかりやすい記述方法や構想(軽ければ尚良し)
があれば教えて頂きたいです。
よろしくお願い致します。

Answer 1

こんなのはどうでしょうか。

hensu.scan(/.{4}/).each_slice(2).to_a.transpose.map(&:join)
  .map{ |str| str.count("2") * 2 + str.count("1") }

4 桁ずつにしたものを二つずつペアにし，できた二次元配列に行列の転置のような操作（縦横の入れ替え）をほどこし，左・右それぞれを連結し，云々というやり方です。

Comments

[KSwordOfHaste]

「元のデータを望む形へ変換していき・・・」というコードは意味を捉えやすいなと感じました。
transposeって構造を大きく変更するものなので処理時間はどうだろうと動かしてみましたがそう遅いというわけでもなく・・・インタープリタ言語の場合ループで書くかループが実現しようとしていることをメソッドでやるかは後者の方が分かり易さの面でも速度の面でもよい選択なのかなと思いました。

[torisan]

縦横変換など考えもしませんでした。
こんなに短くなってしまう物なんですね……。
勉強になる回答ありがとうございました。

[scivola]

transpose は配列を変更するわけではなく，新たな配列を作って返します。
ためしに標準添付の profile ライブラリーを使ってプロファイルを作ってみましたが，transpose にかかっている時間は全体の 1% 程度でした。

[otn]

each_sliceの次が思いつきませんでした。なるほど。

Answer 2

まず、同じ方式で、わかりやすいのではないかと思う記述方法2種。

hensu = "021000000000000002000000000021001000000003000001"

hidari = 0
0.step(hensu.length-1,8) do |i|
    tmp = hensu[i,4]
    hidari += tmp.count("2") * 2 + tmp.count("1")
end
migi = 0
4.step(hensu.length-1,8) do |i|
    tmp = hensu[i,4]
    migi += tmp.count("2") * 2 + tmp.count("1")
end
p hidari
p migi

hidari = 0
migi = 0
hensu.scan(/(....)(....)/).each do |(tmpL,tmpR)|
    hidari += tmpL.count("2") * 2 + tmpL.count("1")
    migi   += tmpR.count("2") * 2 + tmpR.count("1")
end
p hidari
p migi

あとは、1文字ずつ見ていって、1か2ならインデックスを8で割った余りでどちらかに加算する。

ensu = "021000000000000002000000000021001000000003000001"

count=[0,0]
hensu.each_char.with_index do |x,i|
    case x
    when "1"
        count[(i%8)/4] += 1
    when "2"
        count[(i%8)/4] += 2
    end
end
p count[0]
p count[1]

Comments

[KSwordOfHaste]

コンパイラー脳(?)な自分はotnさんの最後の例をイメージしたのですが、やってみるとオリジナルより少々遅く、インタープリタ（というより文字と文字列の区別がないインタープリタ的言語？）だと文字列の一部を切り出す（文字列を生成する）回数の速度への影響が大きいのかなぁと感じました。部分文字列を切り出すのに正規表現が早いかRangeで素朴に切り出すのが早いかなども興味を引く点でした。（やってみてはないですが・・・）

[torisan]

色々な回答ありがとうございました。
３番目の回答が一番分かりやすかったのでBA付けさせていただきます。

[otn]

どれが速いかは中々直感では分からないですよね。