A055946 n + reversal of base 3 digits of n (written in base 10).

0, 2, 4, 4, 8, 12, 8, 12, 16, 10, 20, 30, 16, 26, 36, 22, 32, 42, 20, 30, 40, 26, 36, 46, 32, 42, 52, 28, 56, 84, 40, 68, 96, 52, 80, 108, 40, 68, 96, 52, 80, 108, 64, 92, 120, 52, 80, 108, 64, 92, 120, 76, 104, 132, 56, 84, 112, 68, 96, 124, 80, 108, 136, 68, 96, 124, 80

Offset: 0

Author

Henry Bottomley, Jul 18 2000

Keywords

• base
• nonn

Comments

If n has an even number of digits in base 3 then a(n) is a multiple of 4.

Links

• Seiichi Manyama, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A030102, A056964.

Programs

Maple

A055946 := proc(n)
    n+A030102(n) ;
end proc: # R. J. Mathar, May 28 2016

Mathematica

Array[#+FromDigits[Reverse[IntegerDigits[#,3]],3]&,70,0] (* Harvey P. Dale, Nov 09 2017 *)

Formula

a(n) = n + A030102(n).