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 A072032 #15 Jan 12 2017 15:53:11 %S A072032 2,4,8,1,1,2,1,4,1,1,2,8,2,1,1,4,1,2,1,1,2,2,2,1,1,16,1,2,1,1,4,4,2,1, %T A072032 1,2,1,8,1,1,8,2,2,1,1,1,1,2,1,1,2,2,1,1,1,1,1,2,1,1,8,4,1,1,1,1,1,8, %U A072032 1,1,16,2,1,1,1,1,1,1,2,1,2,8,1,1,1,1,1,1,8,1,2,2,1,1,1,1,1,1,16,1,8,1,1 %N A072032 a(n) = gcd(2^n, reverse(2^n)) = gcd(2^n, A004086(2^n)) = A055483(2^n). %H A072032 Indranil Ghosh, <a href="/A072032/b072032.txt">Table of n, a(n) for n = 1..31180</a> %e A072032 n=12: a(12) = gcd(4096,6904) = 8. %t A072032 nd[x_, y_] := 10*x+y tn[x_] := Fold[nd, 0, x] red[x_] := Reverse[IntegerDigits[x]] Table[GCD[2^w, tn[red[2^w]]], {w, 1, 128}] %Y A072032 Cf. A004086, A055483, A071686. %K A072032 nonn,less,base %O A072032 1,1 %A A072032 _Labos Elemer_, Jun 07 2002