OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..4000
Max Alekseyev, PARI/GP Scripts for Miscellaneous Math Problems (invphi.gp).
FORMULA
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(f1, ", "))); } \\ Amiram Eldar, Nov 05 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Nov 05 2007
STATUS
approved