login
A328212
Lazy-Fibonacci-Niven numbers: numbers divisible by the number of terms in their lazy Fibonacci representation (A112310).
30
1, 2, 4, 6, 9, 12, 15, 16, 28, 30, 35, 36, 48, 55, 60, 70, 72, 75, 78, 84, 90, 102, 105, 114, 119, 126, 133, 144, 147, 154, 156, 161, 168, 180, 182, 184, 192, 198, 203, 208, 216, 224, 238, 240, 245, 252, 259, 264, 266, 272, 280, 296, 301, 304, 308, 315, 320, 322
OFFSET
1,2
LINKS
Helen G. Grundman, Consecutive Zeckendorf-Niven and lazy-Fibonacci-Niven numbers, Fibonacci Quarterly, Vol. 45, No. 3 (2007), pp. 272-276.
EXAMPLE
6 is in the sequence since A112310(6) = 3 and 3 is a divisor of 6.
MATHEMATICA
ooQ[n_] := Module[{k = n}, While[k > 3, If[Divisible[k, 4], Return[True], k = Quotient[k, 2]]]; False]; c = 0; s = {}; Do[If[! ooQ[k], c++; d = Total @ IntegerDigits[k, 2]; If[Divisible[c, d], AppendTo[s, c]]], {k, 1, 2000}]; s
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Oct 07 2019
STATUS
approved