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 A130600 #16 Sep 09 2021 16:38:11
%S A130600 1,1001,10001,10101,10001001,10100001,100000001,100010001,100100101,
%T A130600 101000101,101010101,100000101001,100010001001,100100001001,
%U A130600 100101001001,101000100001,101010000001,1000000000001,1000001000001
%N A130600 Integers written in base phi, with the "decimal point" omitted.
%C A130600 This is the "greedy" or "minimal" representation (see also A130601).
%H A130600 Casey Mongoven and T. D. Noe, <a href="/A130600/b130600.txt">Table of n, a(n) for n = 1..1000</a>
%H A130600 Casey Mongoven, <a href="http://www.caseymongoven.com/scores/B/b416.htm">Music based on this sequence</a>
%H A130600 Ron Knott, <a href="http://www.maths.surrey.ac.uk/hosted-sites/R.Knott/Fibonacci/phigits.html">Integers written in base phi</a>
%e A130600 If the decimal point were included, the sequence would read 1., 10.01, 100.01, 101.01, 1000.1001, 1010.0001, 10000.0001, 10001.0001, 10010.0101, 10100.0101, 10101.0101, ... Unfortunately these are not integers.
%e A130600 Examples: a(2)=1001 because phi^1+phi^-2 = 2, a(3) = 10001 because phi^2+phi^-2 = 3, a(4) = 10101 because phi^2+phi^0+phi^-2 = 4.
%t A130600 nn = 100; len = 2*Ceiling[Log[GoldenRatio, nn]]; Table[d = RealDigits[n, GoldenRatio, len]; last1 = Position[d[[1]], 1][[-1, 1]]; FromDigits[Take[d[[1]], last1]], {n, nn}] (* _T. D. Noe_, May 20 2011 *)
%Y A130600 Cf. A001622, A055778, A105424, A130601.
%K A130600 nonn,base
%O A130600 1,2
%A A130600 _Casey Mongoven_, Aug 06 2007