A099474 Numbers n such that 3*prime(n) - prime(n+1) - 3 is prime.

3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 14, 16, 17, 18, 19, 20, 21, 22, 23, 24, 26, 27, 29, 33, 35, 36, 40, 41, 42, 44, 45, 46, 48, 49, 51, 59, 60, 62, 63, 64, 65, 66, 67, 68, 70, 75, 76, 78, 82, 83, 84, 86, 87, 88, 90, 91, 92, 93, 94, 95, 96, 103, 109, 110, 113, 114, 115, 116, 117

Offset

1,1

Links

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

Example

a(2)=4 since 3*prime(4) - prime(5) - 3 = 3*7 - 11 - 3 = 7 is prime.

Mathematica

Select[ Range[120], PrimeQ[3Prime[ # ] - Prime[ # + 1] - 3] &] (* Robert G. Wilson v, Nov 20 2004 *)

Crossrefs

Sequence in context: A298005 A216442 A298296 * A105048 A026511 A321153

Adjacent sequences: A099471 A099472 A099473 * A099475 A099476 A099477

Keyword

nonn

Author

Giovanni Teofilatto, Nov 18 2004

Extensions

More terms from Robert G. Wilson v, Nov 20 2004

Status

approved