This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A215025 #17 Oct 16 2019 01:48:39
%S A215025 0,2,9,8,10,37,36,33,32,34,41,40,42,149,148,145,144,146,133,132,129,
%T A215025 128,130,137,136,138,165,164,161,160,162,169,168,170,597,596,593,592,
%U A215025 594,581,580,577,576,578,585,584,586,533,532,529,528,530,517,516,513,512
%N A215025 Decimal equivalent of binary number in A215023.
%H A215025 Amiram Eldar, <a href="/A215025/b215025.txt">Table of n, a(n) for n = 0..10000</a>
%t A215025 ind[n_] := Floor[Log[Abs[n]*Sqrt[5] + 1/2]/Log[GoldenRatio]]; f[1] = 1; f[n_] := If[n > 0, i = ind[n - 1]; If[EvenQ[i], i++]; i, i = ind[-n]; If[OddQ[i], i++]; i]; a[n_] := Module[{k = n, s = 0}, While[k != 0, i = f[k]; s += 2^(i - 1); k -= Fibonacci[-i]]; s]; Table[a[n], {n, 0, -100, -1}] (* _Amiram Eldar_, Oct 15 2019 *)
%Y A215025 Cf. A215022-A215025, A014417, A214248.
%K A215025 nonn
%O A215025 0,2
%A A215025 _N. J. A. Sloane_, Aug 03 2012
%E A215025 More terms from _Amiram Eldar_, Oct 11 2019