A382869 Numbers k >= 1 such that A018804(k) is a Fibonacci number (A000045).

1, 2, 3, 4, 7, 9, 11, 1751, 2031, 45012, 105772, 1266256, 1490601, 1774525

Offset

1,2

Links

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

Example

For k = 4: A018804(4) = 8, 8 is a Fibonacci number, thus 4 is a term.

Mathematica

fibQ[n_] := Or @@ IntegerQ /@ Sqrt[5*n^2 + {-4, 4}]; f[p_, e_] := (e*(p - 1)/p + 1)*p^e; q[n_] := fibQ[Times @@ f @@@ FactorInteger[n]]; Select[Range[120000], q] (* Amiram Eldar, Apr 07 2025 *)

Crossrefs

Cf. A000045, A018804.

Similar sequence : A005382.

Sequence in context: A385114 A084913 A270839 * A117450 A132381 A073152

Adjacent sequences: A382866 A382867 A382868 * A382870 A382871 A382872

Keyword

nonn,more

Author

Ctibor O. Zizka, Apr 07 2025

Extensions

a(10)-a(14) from Amiram Eldar, Apr 07 2025

Status

approved