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 A067149 #16 Jan 26 2021 05:56:09
%S A067149 1,2,5,11,23,53,293,24773,422573,86203853
%N A067149 Indices of records of A067148.
%C A067149 For the known terms, A067148(a(n))=n+1, a(n) is odd for n>2 and a(n)==2 (mod 3) for n>1. Do these trends continue?
%t A067149 a[ n_ ] := Module[ {}, If[ n==2, Return[ 1 ] ]; For[ f0=3; f1=2; f2=1; c=0, f0<=n, f0=(f2=f1)+(f1=f0), If[ Mod[ n-f0, f2 ]==0, c++ ] ]; c ]; For[ n=1; max=-1, True, n++, If[ a[ n ]>max, Print[ n ]; max=a[ n ] ] ]
%Y A067149 Cf. A067148.
%K A067149 nonn,more
%O A067149 1,2
%A A067149 _John W. Layman_, Jan 04 2002
%E A067149 Last term from _Dean Hickerson_, Jan 12 2002