login
A166034
Primes which are equal to the sum of three consecutive primes minus 2.
1
13, 29, 47, 107, 157, 197, 233, 317, 347, 563, 587, 631, 659, 677, 769, 787, 827, 839, 881, 929, 983, 1013, 1031, 1097, 1117, 1283, 1301, 1531, 1583, 1609, 1733, 1777, 1847, 1889, 1913, 2099, 2153, 2213, 2267, 2477, 2969, 3083, 3119, 3137, 3191, 3217
OFFSET
1,1
LINKS
EXAMPLE
a(1)=3+5+7-2=13; a(2)=7+11+13-2=29; a(3)=13+17+19-2=47.
MATHEMATICA
Select[Table[Sum[Prime[k], {k, n , n + 2}] - 2, {n, 1, 100}], PrimeQ] (* G. C. Greubel, Apr 24 2016 *)
Select[Total/@Partition[Prime[Range[300]], 3, 1]-2, PrimeQ] (* Harvey P. Dale, Dec 31 2018 *)
CROSSREFS
Sequence in context: A082285 A243138 A153422 * A370238 A031414 A270361
KEYWORD
nonn
AUTHOR
EXTENSIONS
1997 removed and 2267 added by R. J. Mathar, Oct 08 2009
STATUS
approved