A239548 Primes p such that gcd(Lucas(p), Mersenne(p)) > 1.

2, 179, 239, 359, 419, 487, 659, 719, 883, 1013, 1019, 1439, 1459, 1499, 1559, 1723, 1871, 1993, 2039, 2339, 2399, 2459, 2593, 2699, 2819, 2939, 3041, 3299, 3329, 3359, 3539, 3779, 4019, 4813, 4919, 4957, 5039, 5231, 5261, 5279, 5399, 5639, 6011, 6353, 6373

Offset

1,1

Links

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

Eric Weisstein's World of Mathematics, Lucas Number

Eric Weisstein's World of Mathematics, Mersenne Number

Example

239 is in the sequence since it is prime and 479 is a prime factor of both Lucas(239) and Mersenne(239) = 2^239 - 1.

Prog

(Magma) [p: p in PrimesUpTo(6500) | Gcd(Lucas(p), 2^p-1) gt 1];
(PARI) for(p=2, 6373, if(isprime(p)&&gcd(fibonacci(p-1)+fibonacci(p+1), 2^p-1)>1, print1(p, ", ")));

Crossrefs

Supersequence of A230809.

Cf. A000032, A001348.

Sequence in context: A216355 A139942 A349748 * A272237 A094221 A324442

Adjacent sequences: A239545 A239546 A239547 * A239549 A239550 A239551

Keyword

nonn

Author

Arkadiusz Wesolowski, Mar 21 2014

Status

approved