A074118 Largest power of 3 <= 10^n.
1, 9, 81, 729, 6561, 59049, 531441, 4782969, 43046721, 387420489, 3486784401, 94143178827, 847288609443, 7625597484987, 68630377364883, 617673396283947, 5559060566555523, 50031545098999707, 450283905890997363
Offset: 0
Keywords
Programs
-
Mathematica
Table[3^Floor@Log[3, 10^n],{n,0,20}] (*Zak Seidov, Sep 29 2010*)
Extensions
a(0)=1 and more terms from Zak Seidov, Sep 29 2010
Comments