Ruby - 配列をシャッフル(再帰、ラッパーメソッド無し)

初めてのプログラミング 第2版
(オライリージャパン)
Chris Pine (著) 長尾 高弘 (訳)

開発環境

• OS X Lion - Apple(OS)
• Emacs、BBEdit - Bare Bones Software, Inc. (Text Editor)
• Ruby (プログラミング言語)

『初めてのプログラミング 第2版』(Chris Pine　著、長尾 高弘　訳、オライリー・ジャパン、2010年、ISBN978-4-87311-469-9)の 10章(章全部で復習), 10.3(練習問題)、シャッフル(再帰、ラッパーメソッド無し)、を解いてみる。

その他参考書籍

• 『プログラミング言語 Ruby』David Flanagan, まつもと ゆきひろ　著 、卜部 昌平　監訳、長尾 高弘　訳、オライリー・ジャパン、2009年、ISBN978-4-87311-394-4)
• Rubyクックブック ―エキスパートのための応用レシピ集

シャッフル(再帰、ラッパーメソッド無し)

コード(BBEdit)

sample.rb

#!/usr/bin/env ruby2.0
#-*- coding: utf-8 -*-

def sort some_array
    unsorted_array = some_array.slice(0, some_array.length)
    sorted_array = []
    while unsorted_array.length != 0
        min = unsorted_array.pop
        tmp = []
        unsorted_array.each do |item|
            if item < min
                tmp.push min
                min = item
            else
                tmp.push item
            end
        end
        sorted_array.push min
        unsorted_array = tmp
    end
    sorted_array
end

def shuffle some_array
    shuffled_array = []
    unshuffled_array = some_array.slice(0, some_array.length)
    while unshuffled_array.length != 0
        l = unshuffled_array.length
        r = rand l
        shuffled_array.push unshuffled_array[r]
        unshuffled_array = unshuffled_array.slice(0, r) +
                           unshuffled_array.slice(r + 1, l)
    end
    shuffled_array
end

langs = %w[ruby python dart haskell c scheme lisp csharp cpp perl]
sorted_langs = sort langs
shuffled_langs = shuffle sorted_langs
puts "ソート前:   　#{langs}"
puts "ソート後:   　#{sorted_langs}"
puts "シャッフル後: #{shuffled_langs}"

入出力結果(Terminal)

$ ./sample.rb
ソート前:   　["ruby", "python", "dart", "haskell", "c", "scheme", "lisp", "csharp", "cpp", "perl"]
ソート後:   　["c", "cpp", "csharp", "dart", "haskell", "lisp", "perl", "python", "ruby", "scheme"]
シャッフル後: ["cpp", "lisp", "csharp", "perl", "haskell", "python", "dart", "scheme", "ruby", "c"]
$

ちなみにpython3.3の場合。

コード(BBEdit)

sample.py

#!/usr/bin/env python
#-*- coding: utf-8 -*-

import random
def sort(some_list):
    unsorted_list = some_list[:]
    sorted_list = []
    while len(unsorted_list) != 0:
        min = unsorted_list.pop()
        tmp = []
        for x in unsorted_list:
            if x < min:
                tmp.append(min)
                min = x
            else:
                tmp.append(x)
        sorted_list.append(min)
        unsorted_list = tmp
    return sorted_list

def shuffle(some_list):
    shuffled_list = []
    unshuffled_list = some_list[:]
    while len(unshuffled_list) != 0:
        l = len(unshuffled_list)
        r = random.randint(0, l - 1)
        shuffled_list.append(unshuffled_list[r])
        unshuffled_list = unshuffled_list[0:r] + unshuffled_list[r + 1:]
    return shuffled_list

def recursiveShuffle(unshuffled_list, shuffled_list):
    if len(unshuffled_list) == 0:
        return shuffled_list
    r = random.randint(0, len(unshuffled_list) - 1)
    shuffled_list.append(unshuffled_list[r])
    tmp = unshuffled_list[0:r] + unshuffled_list[r + 1:]
    return recursiveShuffle(tmp, shuffled_list)

langs = ["ruby", "python", "dart", "haskell", "c", 
         "scheme", "lisp", "csharp", "cpp", "perl"]
sorted_langs = sort(langs)
shuffled_langs = shuffle(sorted_langs)
print('ソート前: 　  {}'.format(langs))
print('ソート後:   　{}'.format(sorted_langs))
print('シャッフル後: {}'.format(shuffled_langs))

入出力結果(Terminal)

$ ./sample.py
ソート前: 　  ['ruby', 'python', 'dart', 'haskell', 'c', 'scheme', 'lisp', 'csharp', 'cpp', 'perl']
ソート後:   　['c', 'cpp', 'csharp', 'dart', 'haskell', 'lisp', 'perl', 'python', 'ruby', 'scheme']
シャッフル後: ['haskell', 'dart', 'c', 'ruby', 'cpp', 'lisp', 'scheme', 'python', 'perl', 'csharp']
$