This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A092460 #10 Jun 22 2022 12:55:49 %S A092460 0,3,4,6,7,8,9,10,11,12,13,14,16,17,18,19,20,21,22,23,24,25,26,27,28, %T A092460 29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51, %U A092460 53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79 %N A092460 Numbers that are not Bell numbers (A000110). %t A092460 With[{b=BellB[Range[6]]},Complement[Range[0,Last[b]],b]] (* _Harvey P. Dale_, Sep 05 2020 *) %o A092460 (Python) %o A092460 from itertools import accumulate, islice %o A092460 def A092460_gen(): # generator of terms %o A092460 yield 0 %o A092460 blist, b = (1,), 1 %o A092460 while True: %o A092460 blist = list(accumulate(blist, initial=b)) %o A092460 yield from range(b+1,b:=blist[-1]) %o A092460 A092460_list = list(islice(A092460_gen(),30)) # _Chai Wah Wu_, Jun 22 2022 %K A092460 nonn %O A092460 1,2 %A A092460 _N. J. A. Sloane_, Mar 26 2004