OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(3)=4 since 3*prime(4)+2*prime(5) = 3*7 + 2*11 = 43 is prime.
MAPLE
select(n -> isprime(3*ithprime(n)+2*ithprime(n+1)), [$1..200]); # Robert Israel, Mar 11 2020
MATHEMATICA
Position[Partition[Prime[Range[200]], 2, 1], _?(PrimeQ[3#[[1]]+2#[[2]]]&), {1}, Heads->False]//Flatten (* Harvey P. Dale, Apr 23 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Ray Chandler, Jul 31 2004
STATUS
approved