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.

A350258 Triangle read by rows. T(n, k) = k! * BellPolynomial(n, k).

This page as a plain text file.
%I A350258 #8 Dec 30 2021 07:23:27
%S A350258 1,0,1,0,2,12,0,5,44,342,0,15,188,1854,18144,0,52,908,11196,130272,
%T A350258 1545600,0,203,4860,74106,1016544,13818600,193030560,0,877,28428,
%U A350258 531378,8535264,132204600,2065854240,33232948560
%N A350258 Triangle read by rows. T(n, k) = k! * BellPolynomial(n, k).
%e A350258 Triangle starts:
%e A350258 [0] 1
%e A350258 [1] 0,   1
%e A350258 [2] 0,   2,    12
%e A350258 [3] 0,   5,    44,    342
%e A350258 [4] 0,  15,   188,   1854,   18144
%e A350258 [5] 0,  52,   908,  11196,  130272,   1545600
%e A350258 [6] 0, 203,  4860,  74106, 1016544,  13818600,  193030560
%e A350258 [7] 0, 877, 28428, 531378, 8535264, 132204600, 2065854240, 33232948560
%p A350258 A350258 := (n, k) -> ifelse(n = 0, 1, k! * BellB(n, k)):
%p A350258 seq(seq(A350258(n, k), k = 0..n), n = 0..7);
%t A350258 T[n_, k_] := k! BellB[n, k]; Table[T[n, k], {n, 0, 7}, {k, 0, n}] // Flatten
%Y A350258 Cf. A350256, A350257, A350259, A350260, A350261, A350262, A350263.
%Y A350258 Cf. A000110.
%K A350258 nonn,tabl
%O A350258 0,5
%A A350258 _Peter Luschny_, Dec 22 2021