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 A102522 #5 Oct 27 2018 22:02:31
%S A102522 6,6,1,7,1,0,4,1,5,4,2,5,2,7,8,7,2,9,7,7,4,4,5,8,3,3,1,5,0,5,3,7,0,0,
%T A102522 7,9,0,7,9,8,9,4,4,2,8,1,7,2,4,7,0,6,7,9,9,3,2,5,3,4,0,6,3,4,5,2,6,7,
%U A102522 9,5,9,4,0,2,8,0,8,8,1,7,0,4,3,1,5,0,9,4,6,5,5,6,5,2,2,2,8,2,3,6,2,3,9,4,8
%N A102522 Consider A100060 as a binary fraction: this is its decimal fractional equivalent.
%e A102522 0.6617104154252787297744583315053700790798944281724706799325...
%t A102522 zz = { (* the list of values in the link *) }; yy = Drop[zz, 1] - Drop[zz, -1]; xx = Drop[yy, 1] - Drop[yy, -1]; RealDigits[ FromDigits[ {Join[{1}, Table[If[xx[[n]] > 0, 1, 0], {n, 370}]], 0}, 2], 10, 111][[1]]
%Y A102522 Cf. A100060.
%K A102522 cons,nonn
%O A102522 0,1
%A A102522 _Gary W. Adamson_ and _Robert G. Wilson v_, Jan 13 2005