A372353 -id:A372353 - cp's OEIS frontend

A372282 Array read by upward antidiagonals: A(n, k) = A371094(A(n-1, k)) for n > 1, k >= 1; A(1, k) = 2*k-1.

1, 21, 3, 5461, 21, 5, 357913941, 5461, 341, 7, 1537228672809129301, 357913941, 1398101, 45, 9, 28356863910078205288614550619314017621, 1537228672809129301, 23456248059221, 1109, 117, 11, 9649340769776349618630915417390658987772498722136713669954798667326094136661, 28356863910078205288614550619314017621, 6602346876188694799461995861, 873813, 11605, 69, 13

Offset: 1

Antti Karttunen, Apr 28 2024

			Array begins:
n\k|    1     2        3     4      5     6        7     8      9     10
---+----------------------------------------------------------------------
1  |    1,    3,       5,    7,     9,   11,      13,   15,    17,    19,
2  |   21,   21,     341,   45,   117,   69,     341,   93,   213,   117,
3  | 5461, 5461, 1398101, 1109, 11605, 3413, 1398101, 2261, 87381, 11605,

Cf. A005408 (row 1), A372351 (row 2, bisection of A371094), A372444 (column 14).
Arrays derived from this one:
  A372283,
  A372285 the number of terms of A086893 in the interval [A(n, k), A(1+n, k)],
  A372287 the column index of A(n, k) in array A257852,
  A372288 the sum of digits of A(n, k) in "Jacobsthal greedy base",
  A372353 differences between A(n,k) and the largest term of A086893 <= A(n,k),
  A372354 floor(log_2(.)) of terms, A372356 (and their columnwise first differences),
  A372359 terms xored with binary words of the same length, either of the form 10101...0101 or 110101...0101, depending on whether the binary length is odd or even.
Cf. also arrays A371096, A371102 that give subsets of columns of this array, and array A371100 that gives the terms of the row 2 in different order.

up_to = 28;
A371094(n) = { my(m=1+3*n, e=valuation(m,2)); ((m*(2^e)) + (((4^e)-1)/3)); };
A372282sq(n,k) = if(1==n,2*k-1,A371094(A372282sq(n-1,k)));
A372282list(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] = A372282sq((a-(col-1)),col))); (v); };
v372282 = A372282list(up_to);
A372282(n) = v372282[n];

A372359 Array read by upward antidiagonals: A(n, k) = A372358(A372282(n, k)), n,k >= 1.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 24, 4, 0, 0, 0, 256, 32, 6, 0, 0, 0, 0, 6144, 16, 0, 0, 0, 0, 0, 16777216, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 8, 4, 0, 0, 0, 0, 0, 0, 0, 1408, 0, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 32, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6144, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 16777216, 0, 88, 12

Offset: 1

Antti Karttunen, May 01 2024

Zeros occur in the same locations as where they occur in A372353 and where 1's occur in array A372287.

			Array begins:
n\k| 1  2  3    4     5   6  7     8  9    10 11  12         13             14
---+----------------------------------------------------------------------------
1  | 0, 0, 0,   2,    4,  6, 0,    2, 4,    6, 0,  2,        12,            14,
2  | 0, 0, 0,  24,   32, 16, 0,    8, 0,   32, 0, 88,        96,           112,
3  | 0, 0, 0, 256, 6144,  0, 0, 1408, 0, 6144, 0,  0,      8192,          2560,
4  | 0, 0, 0,   0, 2^24,  0, 0,    0, 0, 2^24, 0,  0, 402653184,       6815744,
5  | 0, 0, 0,   0,    0,  0, 0,    0, 0,    0, 0,  0,      2^56, 4947802324992,
6  | 0, 0, 0,   0,    0,  0, 0,    0, 0,    0, 0,  0,         0,     31 * 2^79,
where 2^56 = 72057594037927936 and 31 * 2^79 = 18738350204026752207945728.

Cf. A003987, A086893, A371094, A372282, A372287, A372354, A372358, A372360 (binary weights).

Cf. also A372353.

up_to = 91;
A000523(n) = logint(n,2);
A086893(n) = (if(n%2, 2^(n+1), 2^(n+1)+2^(n-1))\3); \\ From A086893
A372358(n) = bitxor(A086893(1+A000523(n)),n);
A371094(n) = { my(m=1+3*n, e=valuation(m,2)); ((m*(2^e)) + (((4^e)-1)/3)); };
A372282sq(n,k) = if(1==n,2*k-1,A371094(A372282sq(n-1,k)));
A372359sq(n,k) = A372358(A372282sq(n,k));
A372359list(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] = A372359sq((a-(col-1)),col))); (v); };
v372359 = A372359list(up_to);
A372359(n) = v372359[n];

A(n, k) = A372282(n,k) XOR A086893(1+A372354(n, k)), where XOR is bitwise-xor, A003987.

A372352 The difference between n and the largest term of A086893 <= n.

Original entry on oeis.org

0, 1, 0, 1, 0, 1, 2, 3, 4, 5, 6, 7, 0, 1, 2, 3, 4, 5, 6, 7, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 0, 1, 2, 3, 4, 5, 6

Offset: 1

Antti Karttunen (proposed by Ali Sada), Apr 29 2024

The terms a(n) grow from 0 (whenever n is in A086893) by 1 until the next element of A086893 is reached. - M. F. Hasler, May 08 2025

Cf. A086893, A096773, A372353.

Cf. also A372286.

A086893(n) = (if(n%2, 2^(n+1), 2^(n+1)+2^(n-1))\3); \\ From A086893
A372352(n) = { my(k); for(i=1,oo,k=A086893(i); if(k>n, return(n-A086893(i-1)))); };

a(n) = n - max ( A086893 intersect [1..n] ) (= 0 iff n in A086893). - M. F. Hasler, May 08 2025

A372355 Array read by upward antidiagonals: A(n,k) = A372285(1+n, k)-A372285(n, k), n,k >= 1.

Original entry on oeis.org

4, 8, 5, 16, 8, 6, 32, 16, 12, 3, 64, 32, 24, 5, 2, 128, 64, 48, 12, 7, 3, 256, 128, 96, 23, 13, 8, 7, 512, 256, 192, 44, 28, 15, 12, 1, 1024, 512, 384, 88, 55, 28, 24, 5, 6, 2048, 1024, 768, 176, 108, 56, 48, 13, 11, 3, 4096, 2048, 1536, 352, 216, 112, 96, 23, 20, 7, 8, 8192, 4096, 3072, 704, 432, 224, 192, 44, 40, 13, 16, 3

Offset: 1

Antti Karttunen, Apr 29 2024

			Array begins:
n\k|    1     2      3     4     5     6      7     8      9    10     11    12
---+----------------------------------------------------------------------------
1  |    4,    5,     6,    3,    2,    3,     7,    1,     6,    3,     8,    3,
2  |    8,    8,    12,    5,    7,    8,    12,    5,    11,    7,    16,    9,
3  |   16,   16,    24,   12,   13,   15,    24,   13,    20,   13,    32,   15,
4  |   32,   32,    48,   23,   28,   28,    48,   23,    40,   28,    64,   28,
5  |   64,   64,    96,   44,   55,   56,    96,   44,    80,   55,   128,   56,
6  |  128,  128,   192,   88,  108,  112,   192,   88,   160,  108,   256,  112,
7  |  256,  256,   384,  176,  216,  224,   384,  176,   320,  216,   512,  224,
8  |  512,  512,   768,  352,  432,  448,   768,  352,   640,  432,  1024,  448,
9  | 1024, 1024,  1536,  704,  864,  896,  1536,  704,  1280,  864,  2048,  896,
10 | 2048, 2048,  3072, 1408, 1728, 1792,  3072, 1408,  2560, 1728,  4096, 1792,
11 | 4096, 4096,  6144, 2816, 3456, 3584,  6144, 2816,  5120, 3456,  8192, 3584,
12 | 8192, 8192, 12288, 5632, 6912, 7168, 12288, 5632, 10240, 6912, 16384, 7168,

Columnwise first differences of A372285.
Cf. A086893, A372282, A372286.
Cf. also A372353.

up_to = 78;
A086893(n) = (if(n%2, 2^(n+1), 2^(n+1)+2^(n-1))\3); \\ From A086893
A371094(n) = { my(m=1+3*n, e=valuation(m,2)); ((m*(2^e)) + (((4^e)-1)/3)); };
A372282sq(n,k) = if(1==n,2*k-1,A371094(A372282sq(n-1,k)));
A372286(n) = { my(u=A371094(n), k1); for(i=1,oo,if(A086893(i)>=n,k1=i-1; break)); for(i=k1,oo,if(A086893(i)>u,return(i-k1-1))); };
A372355sq(n,k) = (A372286(A372282sq(1+n,k))-A372286(A372282sq(n,k)));
A372355list(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] = A372355sq((a-(col-1)),col))); (v); };
v372355 = A372355list(up_to);
A372355(n) = v372355[n];

cp's OEIS Frontend

A372282 Array read by upward antidiagonals: A(n, k) = A371094(A(n-1, k)) for n > 1, k >= 1; A(1, k) = 2*k-1.

Views

Author

Keywords

Examples

Crossrefs

Programs

PARI

A372359 Array read by upward antidiagonals: A(n, k) = A372358(A372282(n, k)), n,k >= 1.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

PARI

Formula

A372352 The difference between n and the largest term of A086893 <= n.

Views

Author

Keywords

Comments

Crossrefs

Programs

PARI

Formula

A372355 Array read by upward antidiagonals: A(n,k) = A372285(1+n, k)-A372285(n, k), n,k >= 1.

Views

Author

Keywords

Examples

Crossrefs

Programs

PARI