A055967 n - reversal of base 20 digits of n (written in base 10).
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 19, 0, -19, -38, -57, -76, -95, -114, -133, -152, -171, -190, -209, -228, -247, -266, -285, -304, -323, -342, 38, 19, 0, -19, -38, -57, -76, -95, -114, -133, -152, -171, -190, -209, -228, -247, -266, -285, -304, -323, 57, 38, 19, 0, -19, -38, -57, -76, -95
Offset: 0
Crossrefs
Cf. A056965.
Programs
-
Mathematica
Table[n-FromDigits[Reverse[IntegerDigits[n,20]],20],{n,0,70}] (* Harvey P. Dale, Oct 28 2019 *)
Formula
a(n) =n-A056963(n)
Comments