A055951 n - reversal of base 5 digits of n (written in base 10).
0, 0, 0, 0, 0, 4, 0, -4, -8, -12, 8, 4, 0, -4, -8, 12, 8, 4, 0, -4, 16, 12, 8, 4, 0, 24, 0, -24, -48, -72, 24, 0, -24, -48, -72, 24, 0, -24, -48, -72, 24, 0, -24, -48, -72, 24, 0, -24, -48, -72, 48, 24, 0, -24, -48, 48, 24, 0, -24, -48, 48, 24, 0, -24, -48, 48, 24, 0, -24, -48, 48, 24, 0, -24, -48, 72, 48, 24, 0, -24, 72, 48, 24, 0
Offset: 0
Links
- Paolo Xausa, Table of n, a(n) for n = 0..10000
Programs
-
Mathematica
Table[n - IntegerReverse[n, 5], {n, 0, 100}] (* Paolo Xausa, Aug 08 2024 *)
Formula
a(n) = n - A030104(n).
Comments