A004662 Powers of 3 written in base 8.

1, 3, 11, 33, 121, 363, 1331, 4213, 14641, 46343, 163251, 531773, 2015761, 6051723, 22175571, 66571153, 244153501, 754502703, 2705710511, 10521531733, 31765015621, 115737051263, 351635174031

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn
• base
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Crossrefs

Cf. A000244 (powers of 3), A007094 (numbers in base 8).

Programs

Magma

[Seqint(Intseq(3^n,8)): n in [0..50]]; // G. C. Greubel, Oct 12 2018

Mathematica

Table[FromDigits[IntegerDigits[3^n, 8]], {n, 0, 30}] (* Vincenzo Librandi, Jun 07 2013 *)

PARI

vector(50, n, n--; fromdigits(digits(3^n, 8))) \\ G. C. Greubel, Oct 12 2018