A118775 Sum of two consecutive Chen primes.
5, 8, 12, 18, 24, 30, 36, 42, 52, 60, 68, 78, 88, 100, 112, 126, 138, 154, 172, 190, 208, 216, 222, 240, 258, 268, 276, 288, 306, 324, 346, 360, 372, 388, 396, 410, 438, 460, 472, 490, 508, 520, 532, 550, 574, 600, 618, 628, 654, 684, 700, 712, 738, 768, 790
Offset: 1
Keywords
Crossrefs
Cf. A109611.
Programs
-
Mathematica
ch=SequencePosition[PrimeOmega[Range[500]], {1, , 1|2}][[All, 1]] ;Table[ch[[n]]+ch[[n+1]],{n,55}] (* _James C. McMahon, Sep 16 2024 *)