OFFSET
0,2
FORMULA
MATHEMATICA
BellB[Range[0, 40, 5]] (* Harvey P. Dale, Oct 28 2019 *)
PROG
(PARI) for(n=0, 50, print1(round(sum(i=0, 1000, i^(5*n)/(i)!)/exp(1)), ", "))
(Sage) [bell_number(5*n) for n in range(0, 9)] # Zerinvary Lajos, May 15 2009
(Python)
from itertools import accumulate, islice
def A070908_gen(): # generator of terms
yield 1
blist, b = (1, ), 1
while True:
for _ in range(5):
blist = list(accumulate(blist, initial=(b:=blist[-1])))
yield b
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, May 19 2002
STATUS
approved