login
A098761
Primes of the form prime(n) + prime(n+1) - prime(n+2) with multiplicity, ordered by increasing n.
2
5, 7, 11, 13, 13, 23, 37, 37, 41, 53, 73, 97, 101, 103, 109, 127, 137, 157, 179, 191, 223, 223, 229, 251, 263, 271, 269, 307, 311, 353, 373, 389, 409, 419, 433, 457, 479, 487, 491, 503, 541, 563, 571, 593, 641, 647, 673, 683, 691, 701, 757, 809, 821, 853, 859
OFFSET
1,1
LINKS
MATHEMATICA
Select[First[#]+#[[2]]-Last[#]&/@Partition[Prime[Range[200]], 3, 1], PrimeQ] (* Harvey P. Dale, Jun 05 2011 *)
PROG
(Magma) [a: n in [1..150] | IsPrime(a) where a is NthPrime(n)+NthPrime(n+1)-NthPrime(n+2)]; // Vincenzo Librandi, Jun 23 2016
CROSSREFS
Cf. A098865.
Sequence in context: A054500 A082684 A096379 * A113837 A255363 A245757
KEYWORD
nonn,easy
AUTHOR
Giovanni Teofilatto, Oct 30 2004
EXTENSIONS
Edited, corrected and extended by Ray Chandler, Nov 04 2004
STATUS
approved