A004244 a(n) = 10000*log(n) rounded to nearest integer.

0, 6931, 10986, 13863, 16094, 17918, 19459, 20794, 21972, 23026, 23979, 24849, 25649, 26391, 27081, 27726, 28332, 28904, 29444, 29957, 30445, 30910, 31355, 31781, 32189, 32581, 32958, 33322, 33673, 34012, 34340, 34657, 34965, 35264, 35553, 35835

Offset

1,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..3000

Maple

Digits:=1500: A004244:=n->round(10000*log(n)): seq(A004244(n), n=1..60); # Wesley Ivan Hurt, Apr 18 2017

Mathematica

Table[Round[10000 Log[n]], {n, 40}] (* Vincenzo Librandi, Apr 19 2017 *)

Prog

(Magma) [Round(10000*Log(n)): n in [1..40]]; // Vincenzo Librandi, Apr 19 2017

Crossrefs

Sequence in context: A186059 A253612 A004243 * A253736 A004245 A195280

Adjacent sequences: A004241 A004242 A004243 * A004245 A004246 A004247

Keyword

nonn

Author

N. J. A. Sloane

Status

approved