A288794 Numbers k such that Lucas(k) + prime(k) is a prime.

1, 6, 12, 18, 54, 75, 354, 10158, 23280, 33726, 38226, 70749, 244779, 308604

Offset

1,2

Comments

a(15) > 500000.

Links

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

Example

a(1) = 1 because Lucas(1)=1, prime(1)=2 and 1+2=3 is a prime.
a(2) = 6 because Lucas(6)=18, prime(6)=13 and 18+13=31 is a prime.

Mathematica

Select[Range[1000], PrimeQ[LucasL[#] + Prime[#]] &]

Prog

(Magma) [n: n in [1..950] | IsPrime(Lucas(n)+NthPrime(n))];

Crossrefs

Cf. A000032, A000040, A050180.

Sequence in context: A067143 A206038 A205859 * A177708 A344177 A100357

Adjacent sequences: A288791 A288792 A288793 * A288795 A288796 A288797

Keyword

nonn,more

Author

Vincenzo Librandi, Jun 16 2017

Extensions

a(8)-a(12) from Robert Price, Oct 26 2017

a(13)-a(14) from Robert Price, Dec 16 2017

Status

approved