OFFSET
1,1
LINKS
Wikipedia, Run (cards)
EXAMPLE
The divisors of 56 are {1, 2, 4, 7, 8, 14, 28, 56}, with runs {{1, 2}, {4}, {7, 8}, {14}, {28}, {56}}, with lengths (2, 1, 2, 1, 1, 1), which are not weakly decreasing, so 56 is in the sequence.
MATHEMATICA
Select[Range[1000], !GreaterEqual@@Length/@Split[Divisors[#], #2==#1+1&]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Oct 07 2019
STATUS
approved