OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
MATHEMATICA
Table[FromDigits[IntegerDigits[3^n, 8]], {n, 0, 30}] (* Vincenzo Librandi, Jun 07 2013 *)
PROG
(PARI) vector(50, n, n--; fromdigits(digits(3^n, 8))) \\ G. C. Greubel, Oct 12 2018
(Magma) [Seqint(Intseq(3^n, 8)): n in [0..50]]; // G. C. Greubel, Oct 12 2018
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved