|
%I #4 Mar 31 2012 14:39:59
%S 1,1,2,5,8,13,55,89,233,377,610,1597,4181,10946,17711,28657,121393,
%T 514229,832040,1346269,3524578,5702887,9227465,24157817,39088169,
%U 63245986,165580141,267914296,433494437,1836311903,2971215073
%N Fibonacci numbers F(k) for k squarefree (A005117).
%e 10 is squarefree and fibonacci(10)=55, 11 is squarefree and fibonacci(11)=89.
%p with(combinat, fibonacci): fib_dsk := proc(n); if (numtheory[issqrfree](n)='true') then RETURN(fibonacci(n)); fi; end: seq(fib_dsk(i), i=1..100);
%Y Cf. A000045, A005117, A061305.
%K easy,nonn
%O 1,3
%A _Jani Melik_, Oct 07 2002
|
