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 A101262 #7 Mar 14 2015 16:57:56
%S A101262 1,2,6,35,76,90,110,142,198,328,952,9067,18996,20991,23456,26575,
%T A101262 30652,36205,44217,56781,79321,131533,384870,5202154,10762714
%N A101262 Records in the sequence A024573 defined by [1/{n*e}], {x} := x - [x].
%t A101262 lst = {}; a = 0; Do[ b = Floor[1/(n E - Floor[n E])]; If[b > a, AppendTo[ lst, b]; a = b; Print[{n, b}]], {n, 10^7}]; lst (* _Robert G. Wilson v_, Jan 24 2005 *)
%Y A101262 Cf. A024573.
%K A101262 nonn
%O A101262 1,2
%A A101262 _Carlos Alves_, Jan 23 2005
%E A101262 a(20)-a(26) from _Robert G. Wilson v_, Jan 24 2005