## Function Smooth-Hanning

(

**smooth-hanning** < data > )

Smooths ` data' by replacing each element with the weighted mean of it and its<br> two neighbors. The weights are 1/2 for itself and 1/4 for each neighbor. The<br> ends are handled by duplicating the end elements. This function is not<br> destructive; it returns a list the same length as `

data,' which should be a

sequence of numbers.