A353988 Numbers k such that Fibonacci(k) is a binary Niven number (A049445).

1, 2, 3, 6, 8, 9, 10, 12, 18, 24, 30, 36, 48, 56, 60, 100, 120, 144, 150, 168, 240, 270, 288, 300, 324, 330, 336, 360, 444, 540, 594, 600, 624, 720, 750, 840, 864, 896, 900, 936, 1080, 1152, 1200, 1210, 1360, 1404, 1632, 1720, 1921, 2028, 2400, 2520, 2552, 2864

Offset

1,2

Comments

Numbers k such that A011373(k) | A000045(k).

Links

Amiram Eldar, Table of n, a(n) for n = 1..3000

Example

1 is a term since A000045(1) = A011373(1) = 1 and 1 | 1.
10 is a term since A000045(10) = 55, A011373(1) = 5 and 5 | 55.

Mathematica

Select[Range[3000], Divisible[(f = Fibonacci[#]), DigitCount[f, 2, 1]] &]

Prog

(PARI) isok(k) = my(f=fibonacci(k)); ! (f % hammingweight(f)); \\ Michel Marcus, May 13 2022

Crossrefs

Cf. A000045, A000120, A011373, A049445, A117774, A337448 (decimal analog).

Sequence in context: A047405 A175904 A084090 * A373085 A047286 A344156

Adjacent sequences: A353985 A353986 A353987 * A353989 A353990 A353991

Keyword

nonn,base

Author

Amiram Eldar, May 13 2022

Status

approved