A004229 a(n) = 10000*log_10(n) rounded to the nearest integer.
0, 3010, 4771, 6021, 6990, 7782, 8451, 9031, 9542, 10000, 10414, 10792, 11139, 11461, 11761, 12041, 12304, 12553, 12788, 13010, 13222, 13424, 13617, 13802, 13979, 14150, 14314, 14472, 14624
Offset: 1
Keywords
Programs
-
Mathematica
Round[10000*Log10[Range[30]]] (* Harvey P. Dale, Aug 22 2018 *)