A004659 -id:A004659 - cp's OEIS frontend

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

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

Offset: 0

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.

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

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

A004669 Powers of 3 written in base 27.

Original entry on oeis.org

1, 3, 9, 10, 30, 90, 100, 300, 900, 1000, 3000, 9000, 10000, 30000, 90000, 100000, 300000, 900000, 1000000, 3000000, 9000000, 10000000, 30000000, 90000000, 100000000, 300000000, 900000000, 1000000000

Offset: 0

N. J. A. Sloane

Similar to powers of 2 in base 8 (A004647) or 16 (A004655). - M. F. Hasler, Jun 22 2018

G. C. Greubel, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (0,0,10).

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.

Table[FromDigits[IntegerDigits[3^n, 27]], {n, 0, 100}] (* G. C. Greubel, Oct 12 2018 *)

apply( a(n)=3^(n%3)*10^(n\3), [0..20]) \\ M. F. Hasler, Jun 22 2018

a(n) = 3^(n mod 3)*10^floor(n/3). - M. F. Hasler, Jun 22 2018
From Chai Wah Wu, Sep 03 2020: (Start)
a(n) = 10*a(n-3) for n > 2.
G.f.: (-9*x^2 - 3*x - 1)/(10*x^3 - 1). (End)

cp's OEIS Frontend

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

Views

Author

Keywords

Crossrefs

Programs

Mathematica

PARI