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 A070035 #5 Oct 15 2013 22:31:18
%S A070035 0,1,3,4,7,15,16,18,18,23,31,32,34,35,38,39,41,49,63,64,66,70,70,74,
%T A070035 78,85,88,97,101,104,112,127,128,130,134,134,137,142,142,143,146,153,
%U A070035 158,173,173,180,183,198,200,205,205,228,239,255,256,258,262,262,265,270
%N A070035 Exponents of 2 when A068496(n) is also a power of 2.
%F A070035 a(n)=Log[2, A068496(A070034(n))].
%t A070035 Do[s=Mod[n!, 2^n]; If[IntegerQ[Log[2, s]], Print[Log[2, s]]], {n, 1, 1000}]
%Y A070035 Cf. A000142, A000079, A068496, A070034-A070036.
%K A070035 nonn
%O A070035 1,3
%A A070035 _Labos Elemer_, Apr 17 2002