OFFSET
1,2
COMMENTS
Positions of records in A033273.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..571 (terms 1..146 from Ray Chandler)
EXAMPLE
a(4)=12 because twelve has 4 nonprime divisors {1, 4, 6 and 12} whereas a(3)=8 has only 3; and twelve is the first number greater than eight which exhibits this property.
MATHEMATICA
l = 0; Do[ c = Count[PrimeQ[ Divisors[n] ], False]; If[c > l, l = c; Print[n] ], {n, 1, 10^6} ]
PROG
(PARI) lista(nn) = {my(m=0, nb); for (n=1, nn, nb = sumdiv(n, d, !isprime(d)); if (nb > m, m = nb; print1(n, ", ")); ); } \\ Michel Marcus, Jul 16 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Mar 08 2001
EXTENSIONS
Alternate description and b-file from Ray Chandler, Aug 07 2010
STATUS
approved