OFFSET
0,2
LINKS
Michael De Vlieger, Table of n, a(n) for n = 0..4786
EXAMPLE
a(7) = 14, and the 8th Fibonacci number is 21. So for a(8) we want the smallest integer that is both coprime to 14 and is > 21. Checking: 22 is not coprime to 14. But 23 is coprime to 14, so a(8) = 23.
MATHEMATICA
Fold[Append[#1, Block[{k = Fibonacci@ #2 + 1}, While[! CoprimeQ[k, #1[[-1]] ], k++]; k]] &, {1}, Range@ 38] (* Michael De Vlieger, Oct 30 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Feb 28 2009
EXTENSIONS
Extended by Ray Chandler, Jun 19 2009
STATUS
approved