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.
%I A173207 #16 Nov 24 2024 13:40:29
%S A173207 75025,12586269025,225851433717,2111485077978050,4660046610375530309,
%T A173207 354224848179261915075,43566776258854844738105,
%U A173207 114059301025943970552219,42230279526998466217810220532898,1672445759041379840132227567949787325
%N A173207 Cubefree Fibonacci numbers which are not squarefree.
%C A173207 Subsequence of A061899. [_R. J. Mathar_, Feb 16 2010]
%C A173207 Apparently contains Fibonacci(25*m), m>0. - _Ralf Stephan_, Jan 26 2014
%H A173207 Chai Wah Wu, <a href="/A173207/b173207.txt">Table of n, a(n) for n = 1..21</a>
%F A173207 A000045 INTERSECT A067259.
%t A173207 f[n_]:=Union[Last/@FactorInteger[n]][[ -1]];lst={};Do[fibo=Fibonacci[n];If[f[fibo]==2,AppendTo[lst,fibo]],{n,3,2*5!}];lst
%t A173207 Select[Fibonacci[Range[200]],!SquareFreeQ[#]&&Max[FactorInteger[#][[;;,2]]]<3&] (* _Harvey P. Dale_, Nov 24 2024 *)
%o A173207 (Python)
%o A173207 from sympy import factorint
%o A173207 A173207_list = []
%o A173207 a, b = 1, 2
%o A173207 for _ in range(10**2):
%o A173207 if max(factorint(b).values()) == 2:
%o A173207 A173207_list.append(b)
%o A173207 a, b = b, a + b # _Chai Wah Wu_, Jun 08 2015
%K A173207 nonn
%O A173207 1,1
%A A173207 _Vladimir Joseph Stephan Orlovsky_, Feb 12 2010
%E A173207 Converted cross-references to a formula - _R. J. Mathar_, Feb 16 2010