A167745 Integer values of Fibonacci(n)/n.

1, 1, 12, 1932, 3001, 414732, 100156812, 25800145932, 6922972387212, 538340717238107532, 154083590283523737612, 44652993791591388673932, 475400918060101145703001, 3858093084890921488916776332

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Nov 10 2009

Keywords

• nonn

Crossrefs

A023172 [From Charles R Greathouse IV, Nov 12 2009]

Programs

Mathematica

f[n_]:=Fibonacci[n]/n; lst={};Do[If[IntegerQ[f[n]],AppendTo[lst,f[n]]],{n,6!}];lst
Select[Table[Fibonacci[n]/n,{n,200}],IntegerQ] (* Harvey P. Dale, Mar 02 2025 *)