When r > R, g = GM/r^2.

Solve[g 4 π r^2 == 4 π G M , g]

{{g→ (G M)/r^2}}

Created by Mathematica  (February 13, 2007) Valid XHTML 1.1!