1,1

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

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

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

Sequence in context: A298005 A216442 A298296 * A105048 A026511 A321153

Adjacent sequences: A099471 A099472 A099473 * A099475 A099476 A099477

nonn

Giovanni Teofilatto, Nov 18 2004

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

approved