OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
R:= NULL: count:= 0: p:= 0:
for n from 1 while count < 100 do
p:= nextprime(p);
if n * numtheory:-tau(n) > 3 * p then R:= R, n; count:= count+1; fi;
od:
R; # Robert Israel, May 13 2025
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Mar 22 2002
STATUS
approved
