login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A103736 Fibonacci numbers with nonprime indices. 0
0, 1, 3, 8, 21, 34, 55, 144, 377, 610, 987, 2584, 6765, 10946, 17711, 46368, 75025, 121393, 196418, 317811, 832040, 2178309, 3524578, 5702887, 9227465, 14930352, 39088169, 63245986, 102334155, 267914296, 701408733, 1134903170, 1836311903 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,3
LINKS
EXAMPLE
55 is included because 55 is the 10th Fibonacci number and 10 is composite.
MAPLE
with(combinat): a:=proc(n) if isprime(n)=false then fibonacci(n) else fi end: seq(a(n), n=0..52); # Emeric Deutsch, Oct 04 2005
MATHEMATICA
Fibonacci /@ Select[Range[0, 46], ! PrimeQ[ # ] &] (* Robert G. Wilson v *)
Module[{nn=50, ix}, ix=Table[If[PrimeQ[n], 0, 1], {n, 0, nn}]; Pick[Fibonacci[ Range[ 0, nn]], ix, 1]] (* Harvey P. Dale, Apr 26 2018 *)
CROSSREFS
Sequence in context: A046815 A203848 A160404 * A172243 A101332 A007773
KEYWORD
nonn
AUTHOR
Leroy Quet, Oct 01 2005
EXTENSIONS
More terms from Robert G. Wilson v and Emeric Deutsch, Oct 04 2005
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 13:42 EDT 2024. Contains 371254 sequences. (Running on oeis4.)