OFFSET
1,2
COMMENTS
See A277320.
LINKS
EXAMPLE
The top left corner of the array:
n\k | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
-----+-----------------------------------------------------------------------
1 | 1, 2, 7, 4, 13, 14, 11, 8, 25, 26, 31, 28, 21, 22, 19,
2 | 2, 4, 14, 8, 26, 28, 22, 16, 50, 52, 62, 56, 42, 44, 38,
3 | 3, 6, 9, 12, 23, 18, 29, 24, 43, 46, 33, 36, 63, 58, 53,
4 | 4, 8, 28, 16, 52, 56, 44, 32, 100, 104, 124, 112, 84, 88, 76,
5 | 5, 10, 27, 20, 57, 54, 39, 40, 125, 114, 99, 108, 65, 78, 95,
6 | 6, 12, 18, 24, 46, 36, 58, 48, 86, 92, 66, 72, 126, 116, 106,
7 | 7, 14, 21, 28, 35, 42, 49, 56, 79, 70, 93, 84, 107, 98, 121,
8 | 8, 16, 56, 32, 104, 112, 88, 64, 200, 208, 248, 224, 168, 176, 152,
9 | 9, 18, 63, 36, 101, 126, 83, 72, 209, 202, 231, 252, 189, 166, 139,
10 | 10, 20, 54, 40, 114, 108, 78, 80, 250, 228, 198, 216, 130, 156, 190,
11 | 11, 22, 49, 44, 127, 98, 69, 88, 227, 254, 217, 196, 151, 138, 173,
12 | 12, 24, 36, 48, 92, 72, 116, 96, 172, 184, 132, 144, 252, 232, 212,
13 | 13, 26, 35, 52, 81, 70, 127, 104, 181, 162, 155, 140, 233, 254, 199,
14 | 14, 28, 42, 56, 70, 84, 98, 112, 158, 140, 186, 168, 214, 196, 242,
15 | 15, 30, 45, 60, 75, 90, 105, 120, 135, 150, 165, 180, 195, 210, 225,
PROG
(PARI)
up_to = 10440;
A048720(b, c) = fromdigits(Vec(Pol(binary(b))*Pol(binary(c)))%2, 2);
A065621(n) = bitxor(n-1, n+n-1);
A277199list(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] = A277199_sq(col, (a-(col-1))))); (v); };
v277199 = A277199list(up_to);
A277199(n) = v277199[n]; \\ Antti Karttunen, Dec 06 2025
CROSSREFS
KEYWORD
AUTHOR
Antti Karttunen, Nov 01 2016
STATUS
approved
