Computer Science Fundamentals (CS153 2003S)
[Skip to Body]
Primary:
[Front Door]
[Current]
[Glance]

[EC]
[Honesty]
[Instructions]
[Links]
[Search]
[Syllabus]
Groupings:
[EBoards]
[Examples]
[Exams]
[Handouts]
[Homework]
[Labs]
[Lab Writeups]
[Outlines]
[Readings]
[Reference]
ECA:
[About]
[Grades]
[Quizzes]
[Submit Work]
[Change Password]
[Reset Password]
Misc:
[Experiments in Java]
[Scheme Reference]
[Scheme Report]
[CS153 2002S (Walker)]
[CS151 2003S (Rebelsky)]
[CS152 2000F (Rebelsky)]
[SamR]
Summary: In a recent reading and the corresponding laboratory, we've explored the basics of sorting using insertion sort. In this reading, we turn to another sorting algorithm, merge sort.
In looking at algorithms, we often ask ourselves how many steps
the algorithm typically uses. Let's try to look at how much effort the
insertion sort algorithm expends in sorting a list of n values,
starting from a random initial arrangement. Recall that insertion sort
uses two lists: a growing collection of sorted values and a shrinking
collection of values left to examine. At each step, it inserts a value
into the collection of sorted values.
In general, insertion sort has to look through half of the elements in the sorted part of the data structure to find the correct insertion point for each new value it places. The size of that sorted part increases linearly from 0 to n, so its average size is n/2 and the average number of comparisons needed to insert one element is n/4. Taking all the insertions together, then, the insertion sort performs about n^{2}/4 comparisons to sort the entire set. That is, we do an average of n/4 work n times, giving n^{2}/4.
This function grows much more quickly than the size of the input list. For example, if we have 10 elements, we do about 25 comparisons. If we have 20 elements, we do about 100 comparisons. If we have 40 elements, we do about 400 comparisons. And, if we have 100 elements, we do about 2500 comparisons.
Accordingly, when the number of values to be sorted is large (greater than one thousand, say), it is preferable to use a sorting method that is more complicated to set up initially but performs fewer comparisons per value in the list.
As we saw in the case of binary search, it is often profitable to divide an input in half. For binary search, we could throw away half and then recurse on the other half. Clearly, for merging, we cannot throw away part of the list. However, we can still rely on the idea of dividing in half. That is, we'll divide the list into two halves, sort them, and then do something with the two result lists.
Here's a sketch of the algorithm in Scheme:
;;; Procedure: ;;; mergesort ;;; Parameters: ;;; stuff, a list to sort ;;; mayprecede?, a binary predicate that compares values. ;;; Purpose: ;;; Sort stuff. ;;; Produces: ;;; sorted, a sorted list ;;; Preconditions: ;;; mayprecede? can be applied to any two values in stuff. ;;; mayprecede? represents a transitive operation. ;;; Postconditions: ;;; The result list is sorted. That is, the key of any ;;; element may precede the key of any subsequent element. ;;; In Scheme, we'd say that ;;; (mayprecede? (listref sorted i) ;;; (listref sorted (+ i 1))) ;;; holds. ;;; sorted and stuff have the same elements (although potentially ;;; in different orders). ;;; Does not affect stuff. ;;; sorted may share cons cells with stuff. (define mergesort (lambda (stuff mayprecede?) ; If there are only zero or one elements in the list, ; the list is already sorted. (if (or (null? stuff) (null? (cdr stuff))) stuff ; Otherwise, split the list in half (let* ((halves (split stuff)) (firsthalf (car halves)) (secondhalf (cadr halves))) ; Sort each half. (let* ((sortedfirst (mergesort firsthalf)) (sortedsecond (mergesort secondhalf))) ; Do some more stuff ??)))))
But what do we do once we've sorted the two sublists? We need to put them back into one list. Through habit, we refer to the process of joining two sorted lists as merging. It is relatively easy to merge two lists: You repeatedly take the smallest remaining element of either list. When do you stop? When you run out of elements in one of the lists, in which case you use the elements of the remaining list. Putting it all together, we get the following:
;;; Procedure: ;;; merge ;;; Parameters: ;;; sorted1, a sorted list. ;;; sorted2, a sorted list. ;;; mayprecede?, a binary predicate that compares keys ;;; Purpose: ;;; Merge the two lists. ;;; Produces: ;;; sorted, a sorted list. ;;; Preconditions: ;;; mayprecede? can be applied to any two values from ;;; sorted1 and/or sorted2. ;;; mayprecede? represents a transitive operation. ;;; sorted1 and sorted2 are sorted. ;;; Postconditions: ;;; The result list is sorted. ;;; Every element in sorted1 appears in sorted. ;;; Every element in sorted2 appears in sorted. ;;; Every element in sorted appears in sorted1 or sorted2. ;;; Does not affect sorted1 or sorted2. ;;; sorted may share cons cells with sorted1 or sorted2. (define merge (lambda (sorted1 sorted2 mayprecede?) (cond ; If the first list is empty, return the second ((null? sorted1) sorted2) ; If the second list is empty, return the first ((null? sorted2) sorted1) ; If the first element of the first list is smaller, ; make it the first element of the result and recurse. ((mayprecede? (car sorted1) (car sorted2)) (cons (car sorted1) (merge (cdr sorted1) sorted2 mayprecede?))) ; Otherwise, do something similar using the first element ; of the second list (else (cons (car sorted2) (merge sorted1 (cdr sorted2) mayprecede?))))))
All that we have left to do is to figure out how to split a list into two parts. One easy way is to get the length of the list and then cdr down it for half the elements, accumulating the skipped elements as you go. Since it's easiest to accumulate a list in reverse order, we rereverse it when we're done.
;;; Procedure: ;;; split ;;; Parameters: ;;; lst, a list ;;; Purpose: ;;; Split a list into two nearlyequal halves. ;;; Produces: ;;; halves, a list of two lists ;;; Preconditions: ;;; lst is a list. ;;; Postconditions: ;;; halves is a list of length two. ;;; Each element of halves is a list (which we'll refer to as ;;; firsthalf and secondhalf. ;;; Every element in the original list is in exactly one of the ;;; firsthalf and secondhalf. ;;; No other elements are in firsthalf or secondhalf. ;;; Does not modify lst. ;;; Either firsthalf or secondhalf may share cons cells with lst. (define split (lambda (lst) ;;; helper ;;; Remove the first count elements of a list. Return the ;;; pair consisting of the removed elements (in order) and ;;; the remaining elements. (let helper ((remaining lst) ; Elements remaining to be used (revacc null) ; Accumulated initial elements (count ; How many elements left to use (quotient (length lst) 2))) ; If no elements remain to be used, (if (= count 0) ; The first half is in revacc and the second half ; consists of any remaining elements. (list (reverse revacc) remaining) ; Otherwise, use up one more element. (helper (cdr remaining) (cons (car remaining) revacc) ( count 1))))))
In the corresponding lab, you'll
have an opportunity to consider other ways to split the list. In that
lab, you'll work with a slightly
changed version of the code that identifies a key
for each
value in the list and then compares keys.
There's an awful lot of recursion going on in merge sort as we repeatedly split the list again and again and again until we reach lists of length one. Rather than doing all that recursion, we can start by building all the lists of length one and then repeatedly merging pairs of neighboring lists. For example, suppose we start with sixteen values, each in a list by itself.
((20) (42) (35) (10) (69) (92) (77) (27) (67) (62) (1) (66) (5) (45) (25) (90))
When we merge neighbors, we get sorted lists of two elements. At some places
such as when we merge (20)
and (42)
, the elements
stay in their respective order. At other places, such as when we merge
(35)
and (10)
, we need to swap order to
build ordered lists of two elements.
((20 42) (10 35) (69 92) (27 77) (62 67) (1 66) (5 45) (25 90))
Now we can merge these sorted lists of two elements into sorted lists of four elements.
((10 20 35 42) (27 69 77 92) (1 62 66 67) (5 25 45 90))
We can merge these sorted lists of four elements into sorted lists of eight elements.
((10 20 27 35 42 69 77 92) (1 5 25 45 62 66 67 90))
Finally, we can merge these sorted lists of eight elements into one sorted list of sixteen elements.
((1 5 10 20 25 27 35 42 45 62 66 67 69 77 90 92))
Translating this technique into code is fairly easy.
We use one helper, mergepairs
to merge neighboring pairs.
We use a second helper, repeatmerge
to repeatedly call
mergepairs
until there are no more pairs to merge.
(define newmergesort (lambda (stuff mayprecede?) (letrec ( ; Merge neighboring pairs in a list of lists (mergepairs (lambda (listoflists) (cond ; Base case: Empty list. ((null? listoflists) null) ; Base case: Singleelement list (nothing to merge) ((null? (cdr listoflists)) listoflists) ; Recursive case: Merge first two and continue (else (cons (merge (car listoflists) (cadr listoflists) mayprecede?) (mergepairs (cddr listoflists))))))) ; Repeatedly merge pairs (repeatmerge (lambda (listoflists) ; Show what's happening ; (write listoflists) (newline) ; If there's only one list in the list of lists (if (null? (cdr listoflists)) ; Use that list (car listoflists) ; Otherwise, merge neighboring pairs and start again. (repeatmerge (mergepairs listoflists)))))) (repeatmerge (map list stuff)))))
At the beginning of this reading, we saw that insertion sort takes
approximately n^{2}/4 steps to sort a list of n
elements. How long does merge sort take? We'll look at
newmergesort
, since it's easier to analyze. However,
since it does essentially the same thing as the original
mergesort
, just in a slightly different order, the running
time will be similar.
We'll do our analysis in a few steps. First, we will consider the number
of steps in each call to mergepairs
. Next, we will consider
the number of times repeatmerge
calls mregepairs
.
Finally, we'll put the two together. To make things easier, we'll assume
that n (the number of elements in the list) is a power of two.
Initially, repeatmerge
calls mergepairs
on
n lists of length 1 to merge them into n/2 lists of length
2. Building a list of length 2 takes approximately two steps, so
mergepairs
takes approximately n steps to do its
first set of merges.
Next, repeatmerge
calls mergepairs
on
n/2 lists of length 2 to merge them into n/4 lists of
length 4. Building a merged list of length 4 takes approximately four
steps, so mergepairs
takes approximately n steps
to build n/4 list of length 4.
Each time, repeatmerge
calls repeatmerge
to
merge n/2^{k} lists of length 2^{k} into
n/2^{k+1} lists of length 2^{k+1}. A
little math suggests that this once again takes approximately
n steps.
So far, so good. Now, how many times do we call mergepairs
.
We go from lists of length 1, to lists of length 2, to lists of length 4,
to lists of length 8, ..., to lists of length n/4, to lists of length
n/2, to one list of length n. How many times did we call
mergepairs
? The number of times we need to multiply 2 by
itself to get n. As I've noted before, the formal name for that
value is log_{2}n.
To conclude, merge sort repeats a step of nsteps log_{2}n times. Hence, it takes approximately n*log_{2}n steps.
Here's a chart that will help you compare various running times.
n  log_{2}n  n^{2}  n^{2}/4  nlog_{2}n 

10  3.3  100  25  33 
20  4.3  400  100  86 
30  4.9  900  225  147 
40  5.3  1600  400  212 
100  6.6  10000  2500  660 
500  9.0  250000  62500  4483 
1000  10  1,000,000  250,000,000  10,000 
As you can see, although the two sorting algorithms start out taking approximately the same time, as the length of the list grows, the relative cost of using insertion sort becomes a bigger and bigger ratio of the cost of using merge sort.
Tuesday, 24 April 2001 [Samuel A. Rebelsky]
http://www.cs.grinnell.edu/~stone/courses/scheme/mergesort.xhtml
.
Examples/mergesort.ss
.
Wednesday, 25 April 2001 [Samuel A. Rebelsky]
Readings/mergesort.html
.
Tuesday, 26 November 2002 [Samuel A. Rebelsky]
Readings/mergesort.html
.
[Skip to Body]
Primary:
[Front Door]
[Current]
[Glance]

[EC]
[Honesty]
[Instructions]
[Links]
[Search]
[Syllabus]
Groupings:
[EBoards]
[Examples]
[Exams]
[Handouts]
[Homework]
[Labs]
[Lab Writeups]
[Outlines]
[Readings]
[Reference]
ECA:
[About]
[Grades]
[Quizzes]
[Submit Work]
[Change Password]
[Reset Password]
Misc:
[Experiments in Java]
[Scheme Reference]
[Scheme Report]
[CS153 2002S (Walker)]
[CS151 2003S (Rebelsky)]
[CS152 2000F (Rebelsky)]
[SamR]
Disclaimer:
I usually create these pages on the fly
, which means that I rarely
proofread them and they may contain bad grammar and incorrect details.
It also means that I tend to update them regularly (see the history for
more details). Feel free to contact me with any suggestions for changes.
This document was generated by
Siteweaver on Tue May 6 09:21:32 2003.
The source to the document was last modified on Thu Feb 27 19:11:42 2003.
This document may be found at http://www.cs.grinnell.edu/~rebelsky/Courses/CS153/2003S/Readings/mergesort.html
.
You may wish to validate this document's HTML ; ; Check with Bobby
Samuel A. Rebelsky, rebelsky@grinnell.edu