Update home-ice advantage.R

I finished writing a comment in the code.