A075732 Fibonacci numbers F(k) for k not squarefree (A013929).

3, 21, 34, 144, 987, 2584, 6765, 46368, 75025, 196418, 317811, 2178309, 14930352, 102334155, 701408733, 1134903170, 4807526976, 7778742049, 12586269025, 32951280099, 86267571272, 225851433717, 1548008755920, 6557470319842

Offset

0,1

Links

Table of n, a(n) for n=0..23.

Example

4 is a nonsquarefree number and Fibonacci(4)=3, 8 is a nonsquarefree number and Fibonacci(8)=21,...

Maple

with(combinat, fibonacci): fib_ndsk := proc(n); if (numtheory[issqrfree](n)='false') then # or # if (mobius(n)=0) then RETURN(fibonacci(n)) fi; end: seq(fib_ndsk(i), i=1..100);

Mathematica

Fibonacci[#]&/@DeleteCases[Range[100], _?SquareFreeQ]  (* Harvey P. Dale, Apr 20 2011 *)

Crossrefs

Cf. A000045, A013929, A061899.

Sequence in context: A089323 A100986 A213141 * A087690 A191763 A227241

Adjacent sequences: A075729 A075730 A075731 * A075733 A075734 A075735

Keyword

easy,nonn

Author

Jani Melik, Oct 07 2002

Status

approved