|
|
A015022
|
|
q-factorial numbers for q=-8.
|
|
1
|
|
|
1, -7, -399, 181545, 661005345, -19253102683815, -4486300228074519855, 8363069275661695069900425, 124719129516554187174725699959425, -14879571721119777957252576955487113947975
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
Prod_{k=1}^{n} (q^k - 1) / (q - 1).
|
|
MATHEMATICA
|
RecurrenceTable[{a[1]==1, a[n]==(((-8)^n - 1) * a[n-1])/(-9)}, a, {n, 15}] (* Vincenzo Librandi, Oct 26 2012 *)
|
|
PROG
|
(Magma) [n le 1 select 1 else ((-8)^n - 1)*Self(n-1)/(-9): n in [1..13]]; // Vincenzo Librandi, Oct 26 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|