[go: up one dir, main page]

login
A088106
Smallest prime == 1 (mod (product of next n numbers)).
2
2, 7, 241, 15121, 4324321, 39070081, 29837808001, 17081356723201, 1607854392144001, 106137499051584001, 42873948150095462401, 83214009097971687936001, 23877922252236982465536001
OFFSET
1,1
LINKS
EXAMPLE
a(3) = 241 == 1 (mod 120), 120 = 4*5*6.
MATHEMATICA
sp[x_]:=Module[{k=1}, While[CompositeQ[k*x+1], k++]; k x+1]; Module[ {nn= 15, nx}, nx = Times@@@TakeList[Range[(nn(nn+1))/2], Range[nn]]; sp/@nx] (* Harvey P. Dale, May 01 2022 *)
CROSSREFS
Sequence in context: A261267 A020459 A343899 * A343928 A294827 A295610
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Sep 24 2003
EXTENSIONS
More terms from David Wasserman, Jul 19 2005
STATUS
approved