A132012 Records in A051445.
3, 5, 7, 15, 17, 19, 25, 35, 51, 69, 81, 87, 123, 129, 141, 159, 177, 255, 267, 275, 309, 321, 339, 393, 447, 489, 501, 519, 537, 705, 795, 807, 849, 879, 1029, 1245, 1257, 1605, 1671, 1689, 1707, 1761, 1779, 1797, 1851, 1923, 1929, 1941, 1959, 1977, 2505, 2595, 2685
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..4000
- Max Alekseyev, PARI/GP Scripts for Miscellaneous Math Problems (invphi.gp).
Programs
-
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(f1,", ")));} \\ Amiram Eldar, Nov 05 2024