A094104 Primes of the form 2*prime(n) + prime(n+1).

7, 11, 17, 43, 53, 61, 89, 179, 241, 313, 331, 353, 449, 593, 673, 683, 691, 719, 733, 809, 859, 1021, 1051, 1237, 1259, 1321, 1481, 1709, 1741, 1933, 1979, 2083, 2111, 2137, 2221, 2237, 2311, 2333, 2371, 2473, 2531, 2741, 2767, 2957, 3163, 3469, 3643

Offset

1,1

Comments

No intersection with A094105 (Primes of the form prime(m) + 2*prime(m+1)). In general, an integer of the form 2*prime(m) + prime(m+1)) cannot be of the form prime(n) + 2*prime(n+1). - Zak Seidov, May 03 2014

Links

Zak Seidov, Table of n, a(n) for n = 1..1000

Example

a(7) = 2*29 + 31 = 89.

Mathematica

f[n_] := (2Prime[n] + Prime[n + 1]); f[ # ] & /@ Select[Range[160], PrimeQ[f[ # ]] &] (* Robert G. Wilson v *)
Select[2#[[1]]+#[[2]]&/@Partition[Prime[Range[300]], 2, 1], PrimeQ] (* Harvey P. Dale, Jul 19 2022 *)

Prog

(PARI) q=2; forprime(p=3, 1300, if(isprime(r=2*q+p), print1(r, ", ")); q=p)

Crossrefs

Cf. A094105.

Sequence in context: A079651 A178386 A097956 * A167513 A260891 A276039

Adjacent sequences: A094101 A094102 A094103 * A094105 A094106 A094107

Keyword

nonn,easy

Author

Giovanni Teofilatto, May 02 2004

Extensions

Corrected and extended by Klaus Brockhaus and Robert G. Wilson v, May 07 2004

Status

approved