## Function Smooth-Median-2

(

**smooth-median-2** < data > )

Smooths ` data' by replacing each element with the median of it and its<br> neighbor on the left. A median of two elements is the same as their mean. The<br> end is handled by duplicating the end element. This function is not<br> destructive; it returns a list the same length as `

data,' which should be a

sequence of numbers.