A132115 Where records occur in A051445.

1, 2, 3, 4, 8, 9, 10, 12, 16, 22, 27, 28, 40, 42, 46, 52, 58, 64, 88, 100, 102, 106, 112, 130, 148, 162, 166, 172, 178, 184, 208, 268, 282, 292, 294, 328, 418, 424, 556, 562, 568, 586, 592, 598, 616, 640, 642, 646, 652, 658, 664, 688, 712, 784, 904, 1024, 1072, 1168, 1240

Offset

1,2

Links

Amiram Eldar, Table of n, a(n) for n = 1..4000

Max Alekseyev, PARI/GP Scripts for Miscellaneous Math Problems (invphi.gp).

Prog

(PARI) f(n) = {my(v = invphi(2*n)); if(#v == 0, 0, vecmin(v)); } \\ using Max Alekseyev's invphi.gp
lista(kmax) = {my(fmax = -1, f1); for(k = 1, kmax, f1 = f(k); if(f1 > fmax, fmax = f1; print1(k, ", "))); } \\ Amiram Eldar, Nov 05 2024

Crossrefs

Cf. A000010, A051445, A132012.

Sequence in context: A288860 A362930 A356021 * A230998 A184810 A246293

Adjacent sequences: A132112 A132113 A132114 * A132116 A132117 A132118

Keyword

nonn

Author

N. J. A. Sloane, Nov 05 2007

Status

approved