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.

A069110 Squarefree part of F(n) (the Fibonacci numbers): the smallest number such that a(n)*F(n) is a square.

This page as a plain text file.
%I A069110 #18 Sep 08 2022 08:45:05
%S A069110 1,1,2,3,5,2,13,21,34,55,89,1,233,377,610,987,1597,646,4181,6765,
%T A069110 10946,17711,28657,322,3001,121393,196418,317811,514229,208010,
%U A069110 1346269,2178309,3524578,5702887,9227465,103683,24157817,39088169,63245986
%N A069110 Squarefree part of F(n) (the Fibonacci numbers): the smallest number such that a(n)*F(n) is a square.
%H A069110 Amiram Eldar, <a href="/A069110/b069110.txt">Table of n, a(n) for n = 1..1408</a> (terms 1..200 from Vincenzo Librandi)
%t A069110 Column[Table[Times@@Power@@@({#[[1]], Mod[#[[2]], 2]}&/@FactorInteger[Fibonacci[n]]), {n, 20}]] (* _Vincenzo Librandi_, Nov 13 2014 *)
%o A069110 (PARI) for(n=1,60,print1(core(fibonacci(n)),","))
%o A069110 (Magma) [SquareFree(Fibonacci(n)): n in [1..20]]; // _Vincenzo Librandi_, Nov 13 2014
%Y A069110 Cf. A007913.
%K A069110 easy,nonn
%O A069110 1,3
%A A069110 _Benoit Cloitre_, Apr 06 2002