login
A004268
a(n) = floor(10000*log_2(n)).
1
0, 10000, 15849, 20000, 23219, 25849, 28073, 30000, 31699, 33219, 34594, 35849, 37004, 38073, 39068, 40000, 40874, 41699, 42479, 43219, 43923, 44594, 45235, 45849, 46438, 47004, 47548, 48073
OFFSET
1,2
LINKS
MATHEMATICA
Floor[10000*Log[2, Range[50]]] (* Harvey P. Dale, May 07 2013 *)
PROG
(Magma) [Floor(10000*Log(2, n)):n in [1..30]]; // Marius A. Burtea, Aug 02 2019
CROSSREFS
Sequence in context: A153747 A033829 A371004 * A004269 A004270 A168651
KEYWORD
nonn
STATUS
approved