## Function Smooth-Mean-3

(

**smooth-mean-3** < data > )

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

data,' which should be

a sequence of numbers.