Update smoother.R

Comments to the source code