OFFSET
1,3
LINKS
EXAMPLE
The triangular table starts as:
1,
1, 2,
1, 1, 3,
1, 2, 1, 4,
1, 1, 3, 1, 5,
1, 2, 3, 2, 3, 6,
1, 1, 1, 1, 1, 1, 7,
1, 2, 1, 4, 1, 2, 1, 8,
1, 1, 3, 1, 3, 3, 7, 1, 9,
1, 2, 3, 2, 5, 6, 1, 2, 3, 10,
...
PROG
(PARI)
up_to = 105;
A091255sq(a, b) = fromdigits(Vec(lift(gcd(Pol(binary(a))*Mod(1, 2), Pol(binary(b))*Mod(1, 2)))), 2);
A327856list(up_to) = { my(v = vector(up_to), i=0); for(a=1, oo, for(col=1, a, i++; if(i > up_to, return(v)); v[i] = A091255sq(a, col))); (v); };
v327856 = A327856list(up_to);
A327856(n) = v327856[n];
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Antti Karttunen, Sep 28 2019
STATUS
approved