Update top_down function in the R code.

...n of a phrase in the function comments