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 A164632 #13 Apr 03 2025 01:34:41
%S A164632 1,2,2,4,4,4,4,4,4,4,4,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,
%T A164632 8,8,8,8,8,8,8,8,8,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
%U A164632 16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16
%N A164632 a(1) = 1 followed by 2^k appearing 2^(2*k-1) times for k>0.
%C A164632 Occurred when analyzing A056753 to construct a recurrence.
%H A164632 Reinhard Zumkeller, <a href="/A164632/b164632.txt">Table of n, a(n) for n = 1..10000</a>
%F A164632 a(n) = f(n,1,1) with f(x,y,z) = if x=1 then z else if y=1 then f(x-1,2*z*z,2*z) else f(x-1,y-1,z).
%t A164632 Join[{1}, Flatten@Table[2^k, {k, 1, 4}, {2^(2*k - 1)}]] (* _Amiram Eldar_, Apr 03 2025 *)
%o A164632 (Haskell)
%o A164632 a164632 n = a164632_list !! (n-1)
%o A164632 a164632_list = 1 : concatMap (\x -> replicate (2^(2*x-1)) (2^x)) [1..]
%o A164632 -- _Reinhard Zumkeller_, Feb 24 2012, Oct 17 2010
%Y A164632 Cf. A000079, A004171, A056753, A081294, A053644.
%K A164632 nonn
%O A164632 1,2
%A A164632 _Reinhard Zumkeller_, Aug 23 2009
%E A164632 Typo in formula fixed by _Reinhard Zumkeller_, Oct 16 2010