login
A060956
Leading digit of 3^n.
8
1, 3, 9, 2, 8, 2, 7, 2, 6, 1, 5, 1, 5, 1, 4, 1, 4, 1, 3, 1, 3, 1, 3, 9, 2, 8, 2, 7, 2, 6, 2, 6, 1, 5, 1, 5, 1, 4, 1, 4, 1, 3, 1, 3, 9, 2, 8, 2, 7, 2, 7, 2, 6, 1, 5, 1, 5, 1, 4, 1, 4, 1, 3, 1, 3, 1, 3, 9, 2, 8, 2, 7, 2, 6, 2, 6, 1, 5, 1, 4, 1, 4, 1, 3, 1, 3, 1, 3, 9, 2, 8, 2, 7, 2, 7, 2, 6, 1, 5, 1, 5, 1, 4, 1, 4
OFFSET
0,2
LINKS
Dmitry Kamenetsky, First digit of 3^2020, Puzzling StackExchange.
FORMULA
a(n) = [3^n / 10^([log_10(3^n) ]) ] = [3^n / 10^([n*log_10(3) ]) ].
a(n) = A000030(A000244(n)). - Michel Marcus, Jul 03 2018
MATHEMATICA
First[IntegerDigits[#]]&/@(3^Range[0, 110]) (* Harvey P. Dale, May 16 2016 *)
PROG
(PARI) { default(realprecision, 100); for (n=0, 1000, t=log(3)/log(10); write("b060956.txt", n, " ", 3^n \ 10^floor(n*t)); ) } \\ Harry J. Smith, Jul 15 2009
CROSSREFS
Sequence in context: A008564 A348371 A354129 * A125301 A347214 A263559
KEYWORD
nonn,base,easy
AUTHOR
Ahmed Fares (ahmedfares(AT)my-deja.com), May 08 2001
EXTENSIONS
More terms from Larry Reeves (larryr(AT)acm.org), May 11 2001
STATUS
approved