|
| |
|
|
A050180
|
|
prime(n) + fibonacci(n) is prime.
|
|
1
| |
|
|
1, 3, 12, 24, 42, 60, 132, 303, 312, 450, 564, 1236, 1419, 2952, 10098, 12060, 13848
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
MATHEMATICA
| Do[ If[ PrimeQ[ Prime[n] + Fibonacci[n]], Print[n] ], {n, 1, 150000} ]
|
|
|
PROG
| (PARI) for(n=1, 10^5, if(isprime(prime(n)+fibonacci(n)), print1(n, " ")))
|
|
|
CROSSREFS
| Cf. A004397.
Sequence in context: A103449 A030571 A112236 * A028725 A047166 A076506
Adjacent sequences: A050177 A050178 A050179 * A050181 A050182 A050183
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jason Earls (zevi_35711(AT)yahoo.com), Oct 06 2001
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Oct 08 2001
|
| |
|
|