OFFSET
0,3
MAPLE
with(ListTools): ps := L -> PartialSums(L):
seq(add(i, i = ps([seq(Stirling2(n, k), k = 0..n)])), n = 0..24);
PROG
(PARI) a(n) = sum(k=0, n, sum(j=0, k, stirling(n, j, 2))); \\ Michel Marcus, Dec 28 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Dec 27 2022
STATUS
approved