A004659 Powers of 3 written in base 5.
1, 3, 14, 102, 311, 1433, 10404, 32222, 202221, 1112213, 3342144, 21132042, 114001231, 402004243, 2211023334, 12133131112, 42004443341, 231024441123, 1243134423424, 4340014331332, 24120104100101
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[Seqint(Intseq(3^n, 5)): n in [0..30]]; // G. C. Greubel, Sep 10 2018
-
Mathematica
Table[FromDigits[IntegerDigits[3^n, 5]], {n, 0, 40}] (* Vincenzo Librandi, Jun 07 2013 *)
-
PARI
for(n=0,30, print1(fromdigits(digits(3^n, 5)), ", ")) \\ G. C. Greubel, Sep 10 2018