A030196 Distinct elements occurring in triangle of Eulerian numbers (sorted).

1, 4, 11, 26, 57, 66, 120, 247, 302, 502, 1013, 1191, 2036, 2416, 4083, 4293, 8178, 14608, 15619, 16369, 32752, 47840, 65519, 88234, 131054, 152637, 156190, 262125, 455192, 478271, 524268, 1048555, 1310354, 1479726, 2097130, 2203488, 4194281, 4537314, 8388584

Offset

1,2

Links

Table of n, a(n) for n=1..39.

Mathematica

Euler[n_, k_] := Sum[(-1)^i Binomial[n+1, i] (k-i)^n, {i, 0, k}]; tvals = Flatten[Table[Euler[k, #] &/@ Range[k], {k, 100}]]; Sort[DeleteDuplicates[Select[tvals, # <= 2097130 &]]] (* Ant King, Jun 23 2013 *)

Crossrefs

Cf. A008292, A014630.

Sequence in context: A027660 A002940 A356620 * A248425 A356621 A130103

Adjacent sequences: A030193 A030194 A030195 * A030197 A030198 A030199

Keyword

nonn

Author

David W. Wilson

Extensions

a(36)-a(39) from Pontus von Brömssen, Jul 19 2024

Status

approved