A186293 (A007519(n)-1)/2.
8, 20, 36, 44, 48, 56, 68, 96, 116, 120, 128, 140, 156, 168, 176, 200, 204, 216, 224, 228, 260, 284, 288, 296, 300, 308, 320, 336, 380, 384, 404, 428, 440, 464, 468, 476, 488, 504, 516, 524, 548, 564, 576, 596, 600, 608
Offset: 1
Crossrefs
Cf. A186305.
Programs
-
Mathematica
(Select[1 + 8 Range@ 155, PrimeQ] -1)/2 (* Robert G. Wilson v *)