OFFSET
0,3
COMMENTS
EXAMPLE
First few rows of the triangle:
1;
1, 2;
4, 1, 3;
2, 5, 1, 4;
7, 2, 6, 1, 5;
3, 8, 2, 7, 1, 6;
10, 3, 9, 2, 8, 1, 7;
...
MAPLE
A128174 := proc(n, k)
if k > n or k < 1 then
0;
else
modp(k+n+1, 2) ;
end if;
end proc:
A051340 := proc(n, k)
if k = n then
n ;
elif k <= n then
1;
else
0;
end if;
end proc:
A130266 := proc(n, k)
end proc:
seq(seq(A130266(n, k), k=1..n), n=1..15) ; # R. J. Mathar, Aug 06 2016
CROSSREFS
KEYWORD
AUTHOR
Gary W. Adamson, May 18 2007
STATUS
approved