login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Numbers n such that n*tau(n)>5*prime(n).
0

%I #8 Jul 17 2023 12:29:41

%S 2520,3360,3780,3960,4200,4320,5040,6300,6720,7200,7560,7920,8400,

%T 8640,8820,9240,9360,9900,10080,10560,10800,10920,11088,11340,11520,

%U 11700,11760,11880,12096,12240,12480,12600,12960,13104,13200,13440,13680

%N Numbers n such that n*tau(n)>5*prime(n).

%t Select[Range[15000],# DivisorSigma[0,#]>5 Prime[#]&] (* _Harvey P. Dale_, Jul 17 2023 *)

%K easy,nonn

%O 1,1

%A _Benoit Cloitre_, Mar 22 2002