A068083 a(1) = 1, a(n) is the smallest Fibonacci number of the form k*a(n-1) + 1 with k>0.

1, 2, 3, 13, 144, 28657, 701408733, 679891637638612258, 394810887814999156320699623170776339, 215414832505658809004682396169711233230800418578767753330908886771798637

Offset

1,2

Links

Table of n, a(n) for n=1..10.

Example

a(5) = 144 = 11*13 + 1, a(4) = 13.

Mathematica

a[1]=1; a[n_] := a[n]=For[r=3, True, r++, If[Mod[Fibonacci[r]-1, a[n-1]]==0, Return[Fibonacci[r]]]]

Crossrefs

Sequence in context: A224792 A062447 A153888 * A137459 A267422 A072162

Adjacent sequences: A068080 A068081 A068082 * A068084 A068085 A068086

Keyword

nonn

Author

Amarnath Murthy, Feb 18 2002

Extensions

Edited by Dean Hickerson, Feb 20 2002

Status

approved