A273379 Ramanujan's largely composite numbers n (A067128) which are not divisible by all the primes < p, where p is the greatest prime divisor of n.
3, 10, 20, 84, 168, 336, 504, 660, 672, 3960, 4680, 32760, 42840, 43680, 65520, 98280, 131040, 163800, 196560, 262080, 327600, 393120, 471240, 491400, 655200, 942480, 982800, 1053360, 1413720, 1884960, 1965600, 2106720, 2827440, 5654880, 6320160, 13693680, 14137200, 20540520, 27387360, 28274400
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..7692
- P. Erdős, On Highly composite numbers, J. London Math. Soc. 19 (1944), 130--133 MR7,145d; Zentralblatt 61,79.
- Vladimir Shevelev, On Erdős constant, arXiv:1605.08884 [math.NT], 2016.
Programs
-
Mathematica
r = 0; fQ[x_] := Nor[IntegerQ @Log2[x], And[EvenQ[x], Union@ Differences@ PrimePi[FactorInteger[x][[All, 1]]] == {1}]]; Reap[Do[If[# >= r, r = #; If[fQ[i], Sow[i]]] &[DivisorSigma[0, i] ], {i, 2^20}] ][[-1, 1]] (* Michael De Vlieger, Jan 23 2024 *)
Extensions
Inserted a missed term a(11)=4680 by David A. Corneth, May 21 2016
Inserted missing a(13), a(28), a(32) and a(35) by David A. Corneth, May 22 2016
Comments