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 A098324 #11 Jul 12 2015 19:50:07 %S A098324 0,4,11,34,26,67,150,1485,2497,8001,2773,16668,39567,80705,15643, %T A098324 19267,29310,223602,2318795,9376463,7972671,2412975,3754694,9560425, %U A098324 1910435 %N A098324 Recurrence sequence based on positions of digits in decimal places of phi, the Golden Ratio = (1+sqrt(5))/2. %F A098324 a(1)=0, p(i)=position of first occurrence of a(i) in decimal places of phi, a(i+1)=p(i). %e A098324 phi=1.61803398874989484820... %e A098324 So for example, a(2)=4 because 4th decimal place of phi is 0. %e A098324 a(3)=11 because 11th decimal place of phi is 4, a(4)=34 because 11 appears at the 34th to 35th decimal places and so on. %p A098324 with(StringTools): Digits:=100000: G:=convert(evalf((1+sqrt(5))/2),string): a[0]:=0: for n from 1 to 17 do a[n]:=Search(convert(a[n-1],string), G)-2:printf("%d, ",a[n-1]):od: # _Nathaniel Johnston_, Apr 30 2011 %Y A098324 Other recurrence sequences: A097614 for Pi, A098266 for e, A098289 for log(2), A098290 for Zeta(3), A098319 for 1/Pi, A098320 for 1/e, A098321 for gamma, A098322 for G, A098323 for 1/G. %K A098324 more,nonn,base %O A098324 0,2 %A A098324 Mark Hudson (mrmarkhudson(AT)hotmail.com), Sep 03 2004 %E A098324 a(17)-a(24) from _Nathaniel Johnston_, Apr 30 2011