OFFSET
1,2
COMMENTS
Positions of records: 1, 3, 7, 9, 11, 41, 109, 151, 647, ... (A263926).
MATHEMATICA
a=2; ma=0; Reap[Do[k=1; While[!PrimeQ[b=a+k*n], k++]; a=b; If[k>ma, ma=k; Sow[ma]], {n, 10^6}]][[2, 1]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Oct 19 2015
STATUS
approved