コンテンツにスキップ

ボゴソート

出典: フリー百科事典『ウィキペディア(Wikipedia)』

これはこのページの過去の版です。Holdsproud~jawiki (会話 | 投稿記録) による 2009年3月19日 (木) 13:27個人設定で未設定ならUTC)時点の版 (→‎Perlによる実装)であり、現在の版とは大きく異なる場合があります。

ボゴソートは、ソートアルゴリズムの一つ。平均的な計算時間はO(n×n!)で、非常に効率の悪いアルゴリズムとして知られている。安定ソートではない。

アルゴリズム

トランプを順に並べる場合を例にすると、次のようになる。

  1. トランプ52枚の束を放り投げて、ばらばらにする。
  2. 1枚ずつ無作為にすべてを拾い集める。
  3. ソートされているか確認する。もしソート済みでなければ、1から3までの手順を繰り返す。

カードをシャッフルし続けて、偶然一列に並ぶのをひたすら待ちつづけるアルゴリズムと考えてもよい。

疑似コード

function bogosort(array)
  while not is_sorted(array)
    array := random_permutation(array)

Perlによる実装

use List::Util 'shuffle';sub is_sorted{$_[$_-1]>$_[$_]&&return for 1..$#_;return 1}sub bogosort{@_=shuffle@_ until is_sorted@_;@_}

計算時間および停止性

すべての要素が互いに異なる場合、時間計算量はO(n×n!)となる。実際の計算時間は、等しい要素が含まれているか、そしてそれらがどのくらいの頻度で含まれているかに依存する。

アルゴリズムの停止性無限の猿定理により保証される。ただし計算機擬似乱数を用いて実行すると、入力によっては停止しない場合がある。