OFFSET
1,2
COMMENTS
FORMULA
Inverse triangle of A126988.
EXAMPLE
First few rows of the triangle:
1;
-2, 1;
-3, 0, 1;
0, -2, 0, 1;
-5, 0, 0, 0, 1;
6, -3, -2, 0, 0, 1;
-7, 0, 0, 0, 0, 0, 1;
...
MATHEMATICA
nn = 10; s = 0; t[1, 1] = 1; t[n_, k_] := t[n, k] = If[k == 1, -Sum[t[n, k + i]/(i + 1)^(s - 1), {i, 1, n - 1}], If[Mod[n, k] == 0, t[n/k, 1], 0], 0]; Flatten[Table[Table[t[n, k], {k, 1, n}], {n, 1, nn}]] (* Mats Granvik, Mar 12 2016 *)
CROSSREFS
KEYWORD
tabl,sign
AUTHOR
Gary W. Adamson, Jan 06 2007
STATUS
approved