OFFSET
1,1
LINKS
Harry J. Smith, Table of n, a(n) for n=1,...,350
FORMULA
Min{x; GCD[Phi[x+1], Phi[x]]=2n}=Min{x; A058515[x]=2n}
EXAMPLE
n = 10, a(10) = 99, Phi(99) = 60, Phi(100) = 40, GCD[60,40] = 2n = 20.
PROG
(PARI) { for (n=1, 350, x=1; while (gcd(eulerphi(x+1), eulerphi(x)) != 2*n, x++); write("b063444.txt", n, " ", x) ) } \\ Harry J. Smith, Aug 21 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jul 24 2001
STATUS
approved