A004267 a(n) = ceiling(1000*log_2(n)).

0, 1000, 1585, 2000, 2322, 2585, 2808, 3000, 3170, 3322, 3460, 3585, 3701, 3808, 3907, 4000, 4088, 4170, 4248, 4322, 4393, 4460, 4524, 4585, 4644, 4701, 4755, 4808, 4858, 4907, 4955, 5000, 5045, 5088, 5130, 5170, 5210, 5248, 5286, 5322, 5358, 5393, 5427, 5460, 5492

Offset

1,2

Links

Marius A. Burtea, Table of n, a(n) for n = 1..1000

Mathematica

Ceiling[1000*Log[2, Range[40]]] (* Harvey P. Dale, May 04 2013 *)

Prog

(Magma) [Ceiling(1000*Log(2, n)):n in [1..50]; // Marius A. Burtea, Aug 02 2019

Crossrefs

Sequence in context: A027662 A004265 A004266 * A319441 A202456 A168650

Adjacent sequences: A004264 A004265 A004266 * A004268 A004269 A004270

Keyword

nonn

Author

N. J. A. Sloane

Extensions

Corrected by N. J. A. Sloane, May 04 2013 at the suggestion of Harvey P. Dale

Status

approved