cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A075739 Nonsquarefree Fibonacci numbers whose indices are also not squarefree.

This page as a plain text file.
%I A075739 #10 Aug 20 2019 09:14:17
%S A075739 144,2584,46368,75025,14930352,4807526976,12586269025,86267571272,
%T A075739 225851433717,1548008755920,498454011879264,2111485077978050,
%U A075739 160500643816367088,2880067194370816120,51680708854858323072,354224848179261915075,16641027750620563662096
%N A075739 Nonsquarefree Fibonacci numbers whose indices are also not squarefree.
%e A075739 Fib(18)=2584 is there because neither 18 nor 2584 is squarefree.
%p A075739 with(combinat, fibonacci): fib_supM_ndsk := proc(n); if (numtheory[issqrfree](n)='false') then if (numtheory[issqrfree](fibonacci(n))='false') then RETURN(fibonacci(n)); fi; fi; end: seq(fib_supM_ndsk(i), i=1..200);
%t A075739 Select[Table[{n,Fibonacci[n]},{n,300}],NoneTrue[#,SquareFreeQ]&][[All,2]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Aug 20 2019 *)
%Y A075739 Cf. A000045, A013929, A061899, A075738.
%K A075739 easy,nonn
%O A075739 1,1
%A A075739 _Jani Melik_, Oct 07 2002
%E A075739 Edited by _Don Reble_, Nov 05 2005
%E A075739 More terms from _Harvey P. Dale_, Aug 20 2019