A373878 Row products of A317617.
1, 1, 25, 3360, 1336336, 1158917760, 1870414552161, 5024209998931200, 20882706457600000000, 126806525870641017811200, 1078732544346879404306640625, 12413512011036114072165367296000, 188031682201497672618081000000000000, 3661653518107730704646938085472357120000
Offset: 0
Keywords
Links
- Stefano Spezia, Table of n, a(n) for n = 0..150
Programs
-
Mathematica
a[0]=1; a[n_]:=If[EvenQ[n], (n+n^3)^n/2^n, Pochhammer[(1+n^3)/2, n]]; Array[a,14,0]