|
|
A015004
|
|
q-factorial numbers for q=5.
|
|
11
|
|
|
1, 1, 6, 186, 29016, 22661496, 88515803376, 1728802155736656, 168827903320618878336, 82435457461295106532780416, 201258420458750640859769304304896, 2456767777551003294245070550498298923776, 149949204558598784020761783280669552547300269056
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) = Product_{k=1..n} ((q^k - 1) / (q - 1)) where q = 5.
|
|
MATHEMATICA
|
RecurrenceTable[{a[1]==1, a[n]==((5^n - 1)* a[n-1])/4}, a, {n, 15}] (* Vincenzo Librandi, Oct 25 2012 *)
|
|
PROG
|
(Magma) [n le 1 select 1 else (5^n-1)*Self(n-1)/4: n in [1..15]]; // Vincenzo Librandi, Oct 25 2012
(PARI) a(n) = { my(q=5); prod(k=1, n, ((q^k - 1) / (q - 1))) } \\ Andrew Howroyd, Feb 18 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|