|
|
|
|
30, 24, 24, 36, 120, 60, 144, 84, 520, 120, 204, 390, 840, 360, 300, 1120, 240, 384, 276, 288, 456, 648, 2064, 372, 396, 1428, 630, 648, 2886, 480, 1290, 3216, 828, 576, 600, 924, 1920, 990, 1360, 2112, 3240, 2604, 1920, 1560, 1584, 1230, 2604, 1350, 2280, 924
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MATHEMATICA
|
With[{s = #}, Table[k = n + 1; While[! Divisible[s[[k]], s[[n]]], k++]; s[[k]], {n, 50}]] &@ Map[Total, Partition[Prime@ Range[10^4 + 1], 2, 1]] (* Michael De Vlieger, Mar 13 2017, after Harvey P. Dale at A001043 *)
|
|
CROSSREFS
|
Cf. A001043 (sums of 2 successive primes).
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|