|
| |
|
|
A117745
|
|
Prime Fibonacci numbers that are not Chen primes.
|
|
0
| | |
|
|
|
OFFSET
| 0,1
|
|
|
MAPLE
| ischenprime:=proc(n); if (isprime(n) = 'true') then if (isprime(n+2) = 'true' or numtheory[bigomega](n+2) = 2) then RETURN('true') else RETURN('false') fi fi end: ts_prime_fibonacci_notchen:=proc(n) local i, tren, ans; ans:= [ ]: for i from 0 to n do tren := combinat[fibonacci](i): if (isprime( tren ) = 'true' and ischenprime(tren) = 'false') then ans:=[op(ans), tren]: fi od; return ans end: ts_prime_fibonacci_notchen(300); - Jani Melik (jani_melik(AT)hotmail.com), May 05 2006
|
|
|
CROSSREFS
| Cf. A005478, A109611.
Sequence in context: A068131 A068263 A078954 * A189456 A084427 A043412
Adjacent sequences: A117742 A117743 A117744 * A117746 A117747 A117748
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jani Melik (jani_melik(AT)hotmail.com), Apr 28 2006
|
| |
|
|
