login
A007338
Multiplicative encoding of the Eulerian number triangle.
(Formerly M1726)
1
2, 2, 6, 810, 121096582031250, 7114504036033012131698570347034029677643282574273086993343895301222801208496093750
OFFSET
0,1
REFERENCES
R. L. Graham, D. E. Knuth and O. Patashnik, Concrete Mathematics. Addison-Wesley, Reading, MA, 1990, p. 254.
J. Riordan, An Introduction to Combinatorial Analysis, Wiley, 1958, p. 125.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
N. J. A. Sloane, An on-line version of the Encyclopedia of Integer Sequences, Electronic J. Combinatorics, Vol. 1, no. 1, 1994.
MAPLE
a:= n-> mul(ithprime(k+1)^combinat[eulerian1](n, k), k=0..n):
seq(a(n), n=0..5); # Alois P. Heinz, Jul 26 2017
MATHEMATICA
a[0]=2;
a[n_]/; n>=1:=Product[Prime[k]^ResourceFunction["EulerianNumber"][n, k], {k, 1, n}]
Array[a, 6, 0] (* Shenghui Yang, Oct 12 2024 *)
CROSSREFS
Cf. A173018.
Sequence in context: A181265 A093909 A114362 * A164325 A198880 A201315
KEYWORD
nonn,changed
AUTHOR
EXTENSIONS
Last term corrected by Olivier G�rard, Mar 15 1997
a(0)=2 prepended by Alois P. Heinz, Jul 26 2017
STATUS
approved