|
Search: id:A117740
|
|
|
| A117740 |
|
Prime Fibonacci numbers that are Chen primes. |
|
+0
1
|
| |
|
|
OFFSET
|
1,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_chen:=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) = 'true') then ans:=[op(ans), tren]: fi od; RETURN(ans) end: ts_prime_fibonacci_chen(300); - Jani Melik (jani_melik(AT)hotmail.com), May 05 2006
|
|
CROSSREFS
|
Cf. A005478, A109611.
Sequence in context: A139589 A139095 A005478 this_sequence A041047 A120494 A038601
Adjacent sequences: A117737 A117738 A117739 this_sequence A117741 A117742 A117743
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Jani Melik (jani_melik(AT)hotmail.com), Apr 28 2006; corrected Apr 28 2006
|
|
|
Search completed in 0.002 seconds
|
