|
| |
|
|
A134696
|
|
Numbers n such that n*Lucas(n) + 1 is prime.
|
|
0
| |
|
|
1, 2, 3, 4, 6, 10, 42, 48, 56, 66, 70, 86, 108, 126, 134, 214, 248, 459, 1479, 1722, 3076, 5064, 5102, 7602
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| If n=1 then n*Lucas(n) + 1 = 2 (prime).
If n=66 then n*Lucas(n) + 1 = 4099474525767589 (prime).
|
|
|
MATHEMATICA
| Select[Range[9000], PrimeQ[# LucasL[#]+1]&] (* From Harvey P. Dale, Nov 10 2011 *)
|
|
|
CROSSREFS
| Cf. A134313, A134580, A000032.
Sequence in context: A004047 A093912 A181054 * A151677 A111338 A029457
Adjacent sequences: A134693 A134694 A134695 * A134697 A134698 A134699
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Parthasarathy Nambi (PachaNambi(AT)yahoo.com), Jan 27 2008
|
|
|
EXTENSIONS
| More terms from Harvey P. Dale, Nov 10 2011
|
| |
|
|
