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

%I #13 Jul 19 2024 19:08:18

%S 1,4,11,26,57,66,120,247,302,502,1013,1191,2036,2416,4083,4293,8178,

%T 14608,15619,16369,32752,47840,65519,88234,131054,152637,156190,

%U 262125,455192,478271,524268,1048555,1310354,1479726,2097130,2203488,4194281,4537314,8388584

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

%t 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 *)

%Y Cf. A008292, A014630.

%K nonn

%O 1,2

%A _David W. Wilson_

%E a(36)-a(39) from _Pontus von Brömssen_, Jul 19 2024