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 A030333 #10 Jul 13 2013 12:01:54 %S A030333 1,3,5,6,7,12,15,18,20,21,24,25,27,28,29,30,31,33,36,38,39,47,52,55, %T A030333 56,58,65,69,73,76,77,81,83,85,87,88,89,91,93,97,100,101,105,106,109, %U A030333 110,112,113,114,117,118,119,121,122,123,124,125 %N A030333 Position of n-th 1 in A003137. %C A030333 A003137(a(n)) = 1. - _Reinhard Zumkeller_, Feb 21 2013 %H A030333 Reinhard Zumkeller, <a href="/A030333/b030333.txt">Table of n, a(n) for n = 1..10000</a> %o A030333 (Haskell) %o A030333 import Data.List (elemIndices) %o A030333 a030333 n = a030333_list !! (n-1) %o A030333 a030333_list = map (+ 1) $ elemIndices 1 a003137_list %o A030333 -- _Reinhard Zumkeller_, Feb 21 2013 %Y A030333 Cf. A030332, A030334, A030337. %K A030333 nonn %O A030333 1,2 %A A030333 _Clark Kimberling_