OFFSET
1,1
COMMENTS
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..5000
EXAMPLE
59 is in this sequence because prime(59) = 277 divides primorial(j) + 1 for exactly two integers j: 7 and 17.
436 is not in this sequence because prime(436) = 3041 divides primorial(j) + 1 for exactly three integers j: 206, 263, and 409.
MATHEMATICA
np[1]=1; np[n_] := Block[{c=0, p=Prime[n], trg, x=1}, trg = p-1; Do[x = Mod[x Prime[k], p]; If[trg == x, c++], {k, n-1}]; c]; Select[Range[1000], np[#] == 2 &] (* Giovanni Resta, Mar 29 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Jon E. Schoenfield, Mar 24 2017
STATUS
approved
