OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
prime(2)=3 is in the sequence because 3+5*2 = 13 is prime.
prime(6)=13 is in the sequence because 13+5*6 = 43 is prime.
MAPLE
P:= select(isprime, [2, seq(i, i=3..10000, 2)]):
P[select(i -> isprime(P[i]+5*i), [$1..nops(P)])]; # Robert Israel, Aug 01 2024
MATHEMATICA
Prime[Select[Range[300], PrimeQ[Prime[#] + 5 #] &]]
PROG
(Magma) [NthPrime(n): n in [1..300] | IsPrime(NthPrime(n)+5*n)];
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Feb 04 2015
STATUS
approved