A004227 a(n) = ceiling(1000*log_10(n)).

0, 302, 478, 603, 699, 779, 846, 904, 955, 1000, 1042, 1080, 1114, 1147, 1177, 1205, 1231, 1256, 1279, 1302, 1323, 1343, 1362, 1381, 1398, 1415, 1432, 1448, 1463, 1478, 1492, 1506, 1519, 1532, 1545

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn

Programs

Mathematica

Ceiling[1000*Log10[Range[40]]] (* Harvey P. Dale, Jul 19 2018 *)