A167745 -id:A167745 - cp's OEIS frontend

A168041 Fibonacci numbers that are divisible by their index.

1, 5, 144, 46368, 75025, 14930352, 4807526976, 1548008755920, 498454011879264, 51680708854858323072, 16641027750620563662096, 5358359254990966640871840, 59425114757512643212875125, 555565404224292694404015791808

Offset: 1

Vladimir Joseph Stephan Orlovsky, Nov 17 2009

nonn

G. C. Greubel, Table of n, a(n) for n = 1..100

Cf. A000045, A023172, A167745.

f[n_]:=Fibonacci[n]/n; lst={};Do[If[IntegerQ[f[n]],AppendTo[lst,Fibonacci[n]]],{n,4*5!}];lst

a(n) = A000045(A023172(n)).

A272318 Integer values of Lucas number A000032(n)/n.

Original entry on oeis.org

1, 3, 321, 3572225067, 44308057022098435739157981016569

Offset: 1

Peter M. Chema, Apr 25 2016

nonn

The digital root of this sequence appears to be alternately 3 and 6, aside from the initial term of "1".

A subsequence of A181885. For instance, a(2)=A181885(6), a(3)=A181885(18), a(4)=A181885(54); a(5)=A181885(162); and, a(6)=A181885(486). Also 6, 18, 54, 162 and 486 are consecutive terms of the Pinot sequence A008776. Is this a coincidence?

Andrew Howroyd, Table of n, a(n) for n = 1..9

Cf. A000032, A008776, A016089, A167745, A181885, A167745 and A016089.

LucasL[#]/# & /@ Range@ 1200 /. _Rational -> Nothing (* Version 10.2, or *)
Select[Array[LucasL[#]/# &, {1200}], IntegerQ] (* Michael De Vlieger, Apr 25 2016 *)

a(n) = A000032(A016089(n))/n. - Michel Marcus, Apr 25 2016

cp's OEIS Frontend

A168041 Fibonacci numbers that are divisible by their index.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

Formula