login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A092460 Numbers that are not Bell numbers (A000110). 2

%I #10 Jun 22 2022 12:55:49

%S 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 29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,

%U 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 Numbers that are not Bell numbers (A000110).

%t With[{b=BellB[Range[6]]},Complement[Range[0,Last[b]],b]] (* _Harvey P. Dale_, Sep 05 2020 *)

%o (Python)

%o from itertools import accumulate, islice

%o def A092460_gen(): # generator of terms

%o yield 0

%o blist, b = (1,), 1

%o while True:

%o blist = list(accumulate(blist, initial=b))

%o yield from range(b+1,b:=blist[-1])

%o A092460_list = list(islice(A092460_gen(),30)) # _Chai Wah Wu_, Jun 22 2022

%K nonn

%O 1,2

%A _N. J. A. Sloane_, Mar 26 2004

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 09:04 EDT 2024. Contains 371240 sequences. (Running on oeis4.)