|
|
|
|
1, 2, 6, 8, 12, 22, 40, 48, 58, 60, 68, 100, 102, 132, 144, 162, 170, 230, 234, 238, 282, 306, 336, 338, 396, 418, 460, 528, 550, 552, 612, 660
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Positions of records: 1, 3, 7, 9, 11, 41, 109, 151, 647, ... (A263926).
|
|
LINKS
|
|
|
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
|
|
|
STATUS
|
approved
|
|
|
|