OFFSET
1,1
EXAMPLE
{ -2},
{ -4, 0},
{ -4, -4, 0},
{ -6, -2, -2, 2},
{ -6, -2, -6, -6, 2},
{ -8, -2, -2, -2, -2, 4},
{ -8, -4, 0, -8, -4, -4, 4},
{-10, 0, -6, -4, 0, -6, -4, 6},
{-10, -4, -2, 0, -10, -8, -2, -4, 6}
MATHEMATICA
G[n_, m_] := GCD[n, m]
D2[n_, m_] := If[m + 2 <= n, G[n, m + 2] - 2*G[n, m + 1] - G[n, m], {} ];
a = Table[Flatten[Table[D2[n, m], {m, 0, n}]], {n, 0, 10}]; Flatten[a]
CROSSREFS
KEYWORD
AUTHOR
Roger L. Bagula and Gary W. Adamson, Jul 21 2008
EXTENSIONS
Definition corrected and more terms from Georg Fischer, Jun 08 2023
STATUS
approved