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
KEYWORD
nonn
AUTHOR
STATUS
approved