Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A339211
Zeckendorf self numbers: numbers not of the form k + A007895(k).
8
1, 5, 7, 10, 19, 21, 27, 29, 32, 36, 40, 42, 45, 54, 61, 63, 66, 75, 77, 83, 85, 88, 95, 97, 100, 109, 111, 117, 119, 122, 126, 130, 132, 135, 144, 146, 150, 152, 155, 164, 166, 172, 174, 177, 181, 185, 187, 190, 199, 206, 208, 211, 220, 222, 228, 230, 233, 239
OFFSET
1,2
COMMENTS
Analogous to self numbers (A003052) using the Zeckendorf representation (A014417) instead of decimal expansion.
REFERENCES
József Sándor and Borislav Crstici, Handbook of Number theory II, Kluwer Academic Publishers, 2004, Chapter 4, p. 384-386.
LINKS
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 *)
KEYWORD
nonn,base
AUTHOR
Amiram Eldar, Nov 27 2020
STATUS
approved