# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a114555 Showing 1-1 of 1 %I A114555 #9 Aug 09 2015 15:20:48 %S A114555 4,4,4,4,8,9,16,24,36,56,90,147,234,378,612,988,1600,2588,4184,6768, %T A114555 10948,17712,28660,46372,75028,121396,196420,317812,514232,832041, %U A114555 1346272,2178312,3524580,5702888,9227466,14930356,24157818,39088170 %N A114555 Smallest nonsquarefree integer > the n-th term of the Fibonacci sequence. %e A114555 a(4)= 4 because 4 is the smallest nonsquarefree integer greater than 3, the 4th number of the Fibonacci sequence. %t A114555 (* first load package *) << NumberTheory`NumberTheoryFunctions` (* then do *) f[n_] := Block[{k = 1 + Fibonacci@n}, While[SquareFreeQ@k, k++ ]; k]; Array[f, 38] (* _Robert G. Wilson v_ *) %Y A114555 Cf. A005117, A000045, A111077. %K A114555 nonn %O A114555 1,1 %A A114555 Brandon S. Paster (bsp11(AT)psu.edu), Dec 08 2005 %E A114555 More terms from _Robert G. Wilson v_, Dec 22 2005 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE