login
A341799
a(n) is the least integer k such that 1/(Sum_{j=0..n} 1/phi(k+j)) is an integer.
2
1, 3, 12, 13, 30, 31, 5654345764
OFFSET
0,2
COMMENTS
a(7) > 5*10^10 if it exists. - Jinyuan Wang, Apr 30 2021
PROG
(PARI) a(n) = my(m=1); while(denominator(1/sum(j=0, n, 1/eulerphi(j+m))) != 1, m++); m;
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Michel Marcus, Feb 20 2021
EXTENSIONS
a(6) from Jinyuan Wang, Feb 28 2021
STATUS
approved