User blog comment:B1mb0w/The R Function/@comment-25337554-20180305085245/@comment-10262436-20180305092605

I added the calculations for R(1,r(0)) = w.2 and R(2,r(0)) = w.2^w

R(r(0),r(0)) apporx phi(w,0)

and

R(R(r(0),r(0)),n) is apporx f_phi(w,0) (n)