OFFSET
1,2
COMMENTS
The function d(k) (A000005) is the number of divisors of k.
The defining criterion for this sequence is a sufficient, but not necessary, condition for membership in A095849.
Subsequence of A002182. - David Wasserman, Jun 28 2007
Why is 720 not in the sequence? The divisors of 360 begin 1,2,3,4,5,6,8,9,10,12,15,18 (A018412) and the divisors of 720 begin 1,2,3,4,5,6,8,9,10,12,15,16 (A018609). - J. Lowell, Aug 23 2007 [Answer from Don Reble, Sep 11 2007: 720 is precluded by 420. (1,2,3,4,5,6,7,10,12,14,15,20,21,...) (A018444).]
LINKS
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau Of Standards Applied Math. Series 55, Tenth Printing, 1972, p. 844.
J. Britton, Perfect Number Analyzer.
Wikipedia, Table of divisors.
EXAMPLE
As k increases, the positive integer k=6 sets or ties the existing records for smallest first, second and third-smallest divisors (1, 2 and 3), as well as for its fourth-smallest (6). Since no smaller integer has more than three divisors, 6 is a term of this sequence.
PROG
(PARI) ge(va, vb) = {for(i=1, min(#va, #vb), if (va[i] > vb[i], return(0)); ); return(-1); }
isok(k) = {my(dk = divisors(k)); for (m=1, k-1, my(dm = divisors(m)); if (! ge(dk, dm), return(0)); ); return(1); } \\ Michel Marcus, Mar 16 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Matthew Vandermast, Jun 10 2004
EXTENSIONS
More terms from David Wasserman, Jun 28 2007
Definition corrected by Ray Chandler, May 05 2008
STATUS
approved