Function Smooth-Median-2

Part of:

package cl-mathstats
( smooth-median-2 < data > )

Smooths data&#39; 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.