login
A364006
Wythoff-Niven numbers: numbers that are divisible by the number of 1's in their Wythoff representation.
4
1, 3, 4, 6, 7, 8, 10, 12, 15, 18, 20, 21, 24, 26, 28, 32, 35, 39, 40, 42, 45, 47, 51, 52, 54, 55, 56, 60, 68, 72, 76, 80, 84, 86, 88, 90, 91, 98, 100, 102, 105, 117, 120, 123, 125, 135, 136, 138, 141, 143, 144, 156, 164, 168, 172, 174, 176, 178, 180, 188, 192
OFFSET
1,2
COMMENTS
Numbers k such that A135818(k) | k.
Includes all the positive even-indexed Fibonacci numbers (A001906), since the Wythoff representation of Fibonacci(2*n), for n >= 1, is 1 followed by n-1 0's.
LINKS
MATHEMATICA
wnQ[n_] := (s = Total[w[n]]) > 0 && Divisible[n, s] (* using the function w[n] from A364005 *)
KEYWORD
nonn,base
AUTHOR
Amiram Eldar, Jul 01 2023
STATUS
approved