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 A072085 #14 Feb 09 2018 09:13:39
%S A072085 1,1,1,1,1,1,2,1,1,1,2,1,2,2,1,1,1,1,2,1,2,2,1,1,1,2,1,2,1,1,2,1,2,1,
%T A072085 2,1,2,2,2,1,2,2,1,2,1,1,2,1,4,1,1,2,1,1,2,2,2,1,2,1,2,2,2,1,2,2,2,1,
%U A072085 1,2,1,1,2,2,1,2,4,2,2,1,1,2,1,2,1,1,1,2,1,1,4,1,2,2,2,1
%N A072085 a(n) = A072084(A072084(n)).
%H A072085 Reinhard Zumkeller, <a href="/A072085/b072085.txt">Table of n, a(n) for n = 1..10000</a>
%t A072085 b[n_] := Times @@ Power @@@ (FactorInteger[n] /. {p_Integer, e_} :> {DigitCount[p, 2, 1], e}); a[n_] := b[b[n]]; Array[a, 100] (* _Jean-François Alcover_, Feb 09 2018 *)
%o A072085 (Haskell)
%o A072085 a072085 = a072084 . a072084 -- _Reinhard Zumkeller_, Feb 10 2013
%Y A072085 Cf. A072086.
%K A072085 nonn,mult
%O A072085 1,7
%A A072085 _Reinhard Zumkeller_, Jun 14 2002