OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
MATHEMATICA
Table[FromDigits[IntegerDigits[3^n, 4]], {n, 0, 40}] (* Vincenzo Librandi, Jun 07 2013 *)
PROG
(PARI) a(n, b=4, m=3)=fromdigits(digits(m^n, b)) \\ M. F. Hasler, Jun 22 2018
(Magma) [Seqint(Intseq(3^n, 4)): n in [0..30]]; // G. C. Greubel, Sep 10 2018
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved