OFFSET
1,2
COMMENTS
Array A391926 gives the corresponding m.
LINKS
EXAMPLE
Note: The array does not list the initial 0 of each row, which however is included in the row sequences given at right margin. After the semicolon are listed the subsequences of that row which satisfy the relationship for a particular m (given in parentheses, and followed by ? if it is so far only a conjecture). Array A115872 lists the subsequences with m = A065621(n), where n is the row number.
The top left corner of the array:
n\k | 1 2 3 4 5 6 7 8 9 10 11
----+---------------------------------------
1 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, A001477
2 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, (ditto for all rows 2^e)
4 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11,
6 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12,
8 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11,
10 | 1, 2, 3, 4, 6, 7, 8, 9, 12, 14, 15,
12 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12,
14 | 1, 2, 4, 7, 8, 9, 14, 15, 16, 17, 18,
16 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, and A115807 (27)
18 | 1, 2, 3, 4, 5, 6, 7, 8, 10, 12, 14,
20 | 1, 2, 3, 4, 6, 7, 8, 9, 12, 14, 15,
22 | 1, 2, 3, 4, 6, 8, 12, 15, 16, 17, 24,
23 | 1, 2, 4, 7, 8, 14, 16, 28, 31, 32, 33,
24 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12,
PROG
(PARI)
up_to = 105;
A048720(b, c) = fromdigits(Vec(Pol(binary(b))*Pol(binary(c)))%2, 2);
A391925_sq(n, k) = for(i=1, oo, my(Pni=Pol(binary(n*i))*Mod(1, 2), P_i=Pol(binary(i))*Mod(1, 2)); if(0==lift(Pni % P_i), if(k>1, k--, return(i))));
A391925list(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] = A391925_sq(col, (a-(col-1))))); (v); };
v391925 = A391925list(up_to);
A391925(n) = v391925[n];
CROSSREFS
Column 1: A000012.
Row 1: A001477 (also occurs as every 2^e:th row).
Other rows: A391585 (row 3), A391740 (row 5), A391742 (row 7), A391744 (row 9), A391846 (row 11), A391848 (row 13), A391850 (row 15), A391852 (row 17), A391854 (row 19), A391856 (row 21), A391858 (row 25), A391860 (row 49).
KEYWORD
AUTHOR
Antti Karttunen, Dec 23 2025
STATUS
approved
