|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
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
|
|
|
STATUS
|
approved
|
|
|
|