OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
F. Michel Dekking, The sum of digits function of the base phi expansion of the natural numbers, arXiv:1911.10705 [math.NT], 2019.
Wikipedia, Golden ratio base.
EXAMPLE
6 is a term since its base phi representation is 1010.0001, and the number of 1's is 3, which is a divisor of 6.
MATHEMATICA
phiDigSum[1] = 1; phiDigSum[n_] := Plus @@ RealDigits[n, GoldenRatio, 2*Ceiling[ Log[GoldenRatio, n]] ][[1]]; Select[Range[360], Divisible[#, phiDigSum[#]] &]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amiram Eldar, Apr 22 2020
STATUS
approved