cp's OEIS Frontend

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.

A329968 a(0) = 1; a(n) = Sum_{k=1..n} |Stirling1(n,k)| * a(n-k).

This page as a plain text file.
%I A329968 #9 Feb 26 2025 09:30:48
%S A329968 1,1,2,8,77,2329,302564,222085736,1123297137786,45315713537365706,
%T A329968 16445319538981321524068,59677257201788875416461684008,
%U A329968 2382127122661172512076372104185900762,1141042791864963721866517729601372480006639394,7105297245805890887235402087045369387823693986873653108
%N A329968 a(0) = 1; a(n) = Sum_{k=1..n} |Stirling1(n,k)| * a(n-k).
%H A329968 Alois P. Heinz, <a href="/A329968/b329968.txt">Table of n, a(n) for n = 0..44</a>
%p A329968 a:= proc(n) option remember; `if`(n=0, 1,
%p A329968       add(a(n-j)*abs(Stirling1(n, j)), j=1..n))
%p A329968     end:
%p A329968 seq(a(n), n=0..14);  # _Alois P. Heinz_, Feb 25 2025
%t A329968 a[n_] := a[n] = Sum[Abs[StirlingS1[n, k]] a[n - k], {k, 1, n}]; a[0] = 1; Table[a[n], {n, 0, 13}]
%Y A329968 Cf. A008275, A086555, A308444, A329967.
%K A329968 nonn
%O A329968 0,3
%A A329968 _Ilya Gutkovskiy_, Nov 26 2019