102
12

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?

More than 5 years have passed since last update.

[ネタ] 要素数が変化しないO(n)のソートアルゴリズム

Last updated at Posted at 2019-07-31

要素数が変化しないO(n)のソートアルゴリズム

計算量O(n)の画期的なソートアルゴリズムであるスターリンソートをHaskell で実装してみた #Haskell

上記アルゴリズムはO(n)時間でソートが完了する画期的なアルゴリズムである。ただし、つぎのような問題がある。

length xs == length $ stalinSort xsFalseになる」

今回紹介するのは、この問題を解決した修正版のアルゴリズムである。

追記

「タイトル詐欺はけしからん」との声がありましたので、マジメなほうを急遽作成しました。

O(n)時間でソートが終了するバケットソートをHaskellで実装する

考えかた

要素数が変化してしまうのは「粛正」してしまうからだ。そんな乱暴なことをする必要はない。言うことをきかないなら「洗脳」してしまえばいい。

コード

bwsort :: Ord a => [a] -> [a]
bwsort [] = []
bwsort [x] = [x]
bwsort (x : xs@(y : ys))
        | x > y = x : bwsort (x : ys)
        | otherwise = x : bwsort xs
> bwsort [3, 7, 5, 2, 9, 15, 1, 4, 8]
[3,7,7,7,9,15,15,15,15]

これならlength xs == length (bwsort xs)はTrueになる。

まとめ

O(n)時間でソートが完了し、かつ要素数が変化しない「洗脳ソート」を紹介した。

102
12
9

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
102
12

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?