OFFSET
1,2
COMMENTS
Also, the smallest number such that a(n)*Fibonacci(n^2) is a square.
Conjecture: the only primes in this sequence are 3 and 3001.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..37
FORMULA
a(n) = A069110(n^2).
MATHEMATICA
Table[Times@@Power@@@({#[[1]], Mod[#[[2]], 2]}&/@FactorInteger[Fibonacci[n^2]]), {n, 20}]
PROG
(Magma) [SquareFree(Fibonacci(n^2)): n in [1..20]];
(PARI) for(n=1, 60, print1(core(fibonacci(n^2)), ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Nov 12 2014
STATUS
approved