OFFSET
1,2
COMMENTS
The associated values in A002202 are 2, 110, 506, 2162, 3422, ....
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..10000
J. B. Dence and T. P. Dence, A surprise regarding the equation phi(x)=2*(6*n+1), Coll. Math. J. 26 (4) (1995) 297-301.
FORMULA
{k: 12*k+2 in A002202}.
MATHEMATICA
phibnd[n_] := n/(Exp[EulerGamma] Log[Log[n]] + 3/Log[Log[n]]); up = 66000; m = 10^4; While[phibnd[m] <= 12 up + 2, m += 10^4]; Union@ Select[ (EulerPhi@ Range @ m - 2)/12, IntegerQ[#] && # <= up &] (* Giovanni Resta, Jul 04 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
R. J. Mathar, Jul 04 2017
EXTENSIONS
More terms from Giovanni Resta, Jul 04 2017
STATUS
approved