OFFSET
1,2
COMMENTS
Analogous to self numbers (A003052) using the Zeckendorf representation (A014417) instead of decimal expansion.
The numbers of terms that do not exceed 10^k, for k = 0, 1, ..., are 1, 4, 25, 236, 2351, 23495, 234949, 2349463, 23494586, 234945839, 2349458364, ... . Apparently, the asymptotic density of this sequence exists and equals 0.23494583... . - Amiram Eldar, Aug 08 2025
REFERENCES
József Sándor and Borislav Crstici, Handbook of Number theory II, Kluwer Academic Publishers, 2004, Chapter 4, p. 384-386.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Eric Weisstein's World of Mathematics, Self Number.
Eric Weisstein's World of Mathematics, Zeckendorf Representation.
Wikipedia, Self number.
MATHEMATICA
z[n_] := n + Length[DeleteCases[NestWhileList[# - Fibonacci[Floor[Log[Sqrt[5]*# + 3/2]/Log[GoldenRatio]]] &, n, # > 1 &], 0]]; m = 250; Complement[Range[m], Array[z, m]] (* after Alonso del Arte at A007895 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amiram Eldar, Nov 27 2020
STATUS
approved
