A004667 Powers of 3 written in base 13. (Next term contains a non-decimal digit.)

1, 3, 9, 21, 63, 159, 441

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn
• base

Crossrefs

Cf. A000079, A004643, ..., A004655: powers of 2 written in base 10, 4, 5, ..., 16.

Cf. A000244, A004656, A004658, A004659, ..., A004668: powers of 3 in base 10, 2, 4, 5, ..., 26.

Programs

Mathematica

FromDigits[IntegerDigits[#,13]]&/@(3^Range[0,6]) (* Harvey P. Dale, Mar 05 2018 *)

PARI

apply( a(n, b=13, m=3)=fromdigits(digits(m^n, b)), [0..6]) \\ This implements one possible continuation of the sequence beyond n = 6: write digits in decimal and carry over (so CC4 -> 12*100 + 12*10 + 4 = 1324). - M. F. Hasler, Jun 22 2018