|
|
A015019
|
|
q-factorial numbers for q=-6.
|
|
1
|
|
|
1, -5, -155, 28675, 31857925, -212333070125, -8491411807368875, 2037471806119124711875, 2933289072587326393069793125, -25337824341236140066496699758578125, -1313212585969062194023540996089250607796875
(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]==(((-6)^n - 1) * a[n-1])/(-7)}, a, {n, 15}] (* Vincenzo Librandi, Oct 26 2012 *)
|
|
PROG
|
(Magma) [n le 1 select 1 else ((-6)^n - 1)*Self(n-1)/(-7): n in [1..18]]; // Vincenzo Librandi, Oct 26 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|