http://www.sthda.com/english/wiki/amazing-interactive-3d-scatter-plots-r-software-and-data-visualization

I see fit='smooth' is mentioned above. But it is not clear what is the underlying code to compute the smooth result. Could anybody show me the code to compute the smooth surface?