|
|
|
|
5, 31, 41, 59, 139, 281, 281, 281, 311, 479, 593, 1153, 1153, 1283, 1559, 1559, 2213, 2213, 2213, 3167, 3167, 2963, 2963, 3067, 3067, 3181, 3181, 5153, 6779, 7451, 9463, 9463, 9859, 10061, 10061, 10061, 10061, 10889, 17539, 17539, 17539, 17539, 22229, 22229, 22229, 30869, 30869, 30869, 32717
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Terms can occur more than once, corresponding to repeated values in A341631.
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
|
|
MAPLE
|
R:= 5: S:= [2, 3]: s:= 5: q:= 5: count:= 1:
for n from 3 while count < 100 do
if n = S[1]+1 then S:= S[2..-1]; s:= s-n+1 fi;
if q <= 2*n then S:= [op(S), q]; s:= s+q; q:= nextprime(q) fi;
if s mod n = 0 then count:= count+1; R:= R, s fi;
od:
R;
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|