A372098 -id:A372098 - cp's OEIS frontend

A372097 Exponents k where A000120(3^k) - A070939(3^k)/2 reaches a new minimum.

0, 2, 4, 7, 16, 24, 40, 49, 53, 102, 104, 126, 174, 226, 379, 768, 831, 832, 1439, 1452, 1914, 2291, 2731, 3000, 3363, 3472, 5608, 5883, 6725, 6787, 7438, 8786, 10280, 11948, 12190, 13135, 15170, 15645, 22407, 26232, 27099, 32773, 33085, 40189, 40523, 48068, 51187

Offset: 1

Hugo Pfoertner, Apr 25 2024

nonn

These are the k-values of the lower envelope of the scatter band of the deviation of the binary weight of 3^k from half the length of the corresponding binary number. The corresponding negated differences are given in A372098.

Hugo Pfoertner, Table of n, a(n) for n = 1..99
Hugo Pfoertner, Illustration of scatter band bounded by lower and upper records, up to exponents k=8*10^6.

Cf. A000120, A000244, A011754, A070939, A078839, A372098, A372099, A372100.

a372097(upto) = {my (dm=-oo); for (k=0, upto, my (p=3^k, h=hammingweight(p), b=#binary(p)/2,d=b-h); if (d>dm, print1(k,", "); dm=d))};
a372097(60000)

A372099 Exponents k where A000120(3^k) - A070939(3^k)/2 reaches a new maximum.

Original entry on oeis.org

0, 1, 3, 5, 11, 27, 71, 119, 140, 158, 198, 218, 441, 537, 538, 868, 1092, 2128, 2294, 2343, 2811, 2911, 3849, 4003, 4655, 5079, 5279, 5920, 6269, 6603, 10181, 10574, 12801, 12803, 15563, 15784, 16054, 16253, 17127, 18257, 20187, 21934, 34633, 49209, 76791, 78938

Offset: 1

Hugo Pfoertner, Apr 25 2024

nonn

These are the k-values of the upper envelope of the scatter band of the deviation of the binary weight of 3^k from half the length of the corresponding binary number. The corresponding differences are given in A372100.

Hugo Pfoertner, Table of n, a(n) for n = 1..96
Hugo Pfoertner, Illustration of scatter band bounded by lower and upper records, up to exponents k=8.5*10^6.

Cf. A000120, A000244, A011754, A070939, A078839, A372097, A372098, A372100.

a372099(upto) = {my(dm=oo); for (k=0, upto, my (p=3^k, h=hammingweight(p), b=#binary(p)/2, d=b-h); if (d

A372100 a(n) = 2*A000120(3^k) - A070939(3^k) with k = A372099(n).

Original entry on oeis.org

1, 2, 3, 4, 8, 17, 23, 29, 38, 39, 44, 56, 57, 58, 91, 114, 145, 147, 156, 168, 182, 208, 219, 239, 277, 297, 300, 307, 331, 360, 367, 442, 452, 477, 487, 492, 507, 513, 568, 571, 614, 893, 963, 1275, 1283, 1288, 1440, 1563, 1702, 1957, 2019, 2440, 2471, 2566, 3004

Offset: 1

Hugo Pfoertner, Apr 25 2024

nonn

a(n)/2 are the differences at supporting points of the upper envelope of the scatter band of the deviation of the binary weight of 3^k from half the length of the corresponding binary number.

Hugo Pfoertner, Table of n, a(n) for n = 1..96

Cf. A000120, A000244, A011754, A070939, A078839, A372097, A372098, A372099.

cp's OEIS Frontend

A372097 Exponents k where A000120(3^k) - A070939(3^k)/2 reaches a new minimum.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A372099 Exponents k where A000120(3^k) - A070939(3^k)/2 reaches a new maximum.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A372100 a(n) = 2*A000120(3^k) - A070939(3^k) with k = A372099(n).

Views

Author

Keywords

Comments

Links

Crossrefs