OFFSET
1,17
EXAMPLE
The array starts:
1
0 1
0 0 1
0 1 0 1
0 0 0 0 1
0 2 1 1 0 1
PROG
(PARI) am(n)=local(r); r=matrix(n, n, i, j, i==j); for(i=2, n, for(j=1, i-1, for(k=1, j, if(gcd(i-j, k)>1, r[i, i-j]+=r[j, k])))); r
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Franklin T. Adams-Watters, May 28 2010
STATUS
approved