OFFSET
0,1
COMMENTS
Record values: 11, 27, 60, 72, 120, 180, 270, 480, 1155, 1260, 4590, 7980, 9180, 10080, 10710, 21420, 27300, 52080, 62370, 191520, 207480, 214200, 428400, ..., .
LINKS
Robert G. Wilson v, Table of n, a(n) for n = 0..876
EXAMPLE
a(0) = 11 because (2*11)^2 = 484 is the smaller integer that can't be written as (p-1)*(q-1) with p,q primes, p < q.
a(3) = 10 because (2*10)^2 = 400 is the smaller integer such that the Diophantine equation (p-1)*(q-1) = 400 has three solutions: (p,q) = (2,401) = (5,101) = (11,41); also, phi(2*401) = phi(5*101) = phi(11*41) = 20^2.
MATHEMATICA
f[n_] := Length@ Select[ Divisors[ 4n^2], # < 2n && PrimeQ[# +1] && PrimeQ[4n^2/# +1] &]; t[_] := 0; k = 1; While[k < 100000, a = f@k; If[t[a] == 0, t[a] = k]; k++]; t@# & /@ Range[0, 50]
CROSSREFS
KEYWORD
nonn
AUTHOR
Bernard Schott and Robert G. Wilson v, Mar 30 2019
STATUS
approved