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
Alois P. Heinz, Table of n, a(n) for n = 0..6
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
KEYWORD
nonn
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