A133645 Integers arising in A133677.

2, 5, 15, 77, 187, 345, 551, 1107, 1457, 1855, 2301, 3337, 4565, 5251, 6767, 7597, 8475, 11397, 12467, 14751, 18537, 19895, 21301, 24257, 25807, 34277, 36115, 38001, 41917, 43947, 46025, 48151, 52547, 57135, 64377, 66887, 80157, 82955, 85801

Offset

1,1

Links

Table of n, a(n) for n=1..39.

Mathematica

Union[Table[If[IntegerQ[Prime[n]*(2*Prime[n] - 1)/3], Prime[n]*(2*Prime[n] - 1)/3, {}], {n, 1, 100}]]

Crossrefs

Sequence in context: A158079 A090091 A268122 * A090130 A090140 A032267

Adjacent sequences: A133642 A133643 A133644 * A133646 A133647 A133648

Keyword

nonn

Author

Roger L. Bagula, Dec 28 2007

Status

approved