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 A037397 #8 May 30 2013 17:44:28 %S A037397 1,2,3,4,12,24,31,62,93,104,124,130,150,156,162,174,182,213,250,260, %T A037397 281,302,312,324,342,390,473,493,504,604,624,781,812,831,912,1003, %U A037397 1030,1031,1032,1033,1034,1043,1083,1093,1174,1234,1243 %N A037397 Every base 5 digit of n is a base 10 digit of n. %H A037397 Reinhard Zumkeller, <a href="/A037397/b037397.txt">Table of n, a(n) for n = 1..10000</a> %o A037397 (Haskell) %o A037397 import Data.List ((\\), nub) %o A037397 a037397 n = a037397_list !! (n-1) %o A037397 a037397_list = filter f [1..] where %o A037397 f x = null $ nub (ds 5 x) \\ nub (ds 10 x) %o A037397 ds b x = if x > 0 then d : ds b x' else [] where (x', d) = divMod x b %o A037397 -- _Reinhard Zumkeller_, May 30 2013 %Y A037397 Cf. A037393, A037394, A037395, A037396. %K A037397 nonn,base %O A037397 1,2 %A A037397 _Clark Kimberling_