冒泡排序算法 For ERL

版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/qqqrtretretee/article/details/79712801

(ERL的冒泡排序)Bubble Sorting IN ERLANG


实现原理
1. 从数组的第一个元素arr[0]开始,两两比较arr[n]arr[n+1],如果前面的数大于后面的数arr[n] > arr[n+1],那么交换两个元素的位置,把大的数往后移动
2. 依次经过一轮比较以后,最大的数将会被交换到最后的位置arr[n-1]

实现要素:

递归法

代码

run(OrderedList, []) -> OrderedList;
run(OrderedList, [H|T]) ->
    {Rs, Max} = bubble_run(H, T, []),
    run([Max]++OrderedList, Rs).

bubule_run(Max, [], T) -> {T, Max};
bubble_run(Max, [H|T], T1) ->
    case Max >= H of
        true ->
            bubble(Max, T, [H|T1]);
        _ ->
            bubble(H, T, [Max|T1])
    end.

取列表头作为最大值和②值比较,如果列表头值>②的值,则不用交换,把尾列表进行递归,同时把两两比较中最小的值保持到新列表中,目的是要把最大值从列表中分离出来,循环n-1次,冒泡排序至此结束

猜你喜欢

转载自blog.csdn.net/qqqrtretretee/article/details/79712801