A214795 a(n) is the smallest k>=2 such that n divides Fibonacci(k-1)+21.
2, 2, 5, 5, 10, 5, 9, 5, 17, 12, 2, 5, 6, 9, 13, 17, 8, 17, 11, 53, 9, 2, 4, 5, 30, 6, 45, 17, 7, 33, 23, 41, 13, 8, 33, 17, 47, 11, 21, 53, 29, 9, 53, 23, 93, 33, 25, 17, 65, 30, 29, 23, 42, 45, 10, 17, 29, 21, 51, 53
Offset: 1
Keywords
Programs
-
Mathematica
skdf[n_]:=Module[{k=2},While[!Divisible[Fibonacci[k-1]+21,n],k++];k]; Array[ skdf,60] (* Harvey P. Dale, Nov 25 2017 *)
Extensions
Definition corrected. - R. J. Mathar, Aug 09 2012
Comments