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 A173616 #17 Aug 13 2025 22:48:22
%S A173616 1,11,117,1178,11787,117870,1178701,11787019,117870197,1178701972,
%T A173616 11787019723,117870197230,1178701972308,11787019723085,
%U A173616 117870197230855,1178701972308551,11787019723085519,117870197230855196,1178701972308551965,11787019723085519654
%N A173616 The first n digits of Reverse(A002275(n)^A002275(n)).
%C A173616 0 <= a(n)-10*a(n-1)<10
%C A173616 All terms are prefixes of later terms.
%e A173616 reverse(11^11)=116076113582 =>a(2)=11 reverse(111^111)=117...... =>a(3)=117 reverse(1111^111)=1178....=>a(4)=1178
%t A173616 repunit[n_] := Sum[10^i, {i, 0, n - 1}]; a[n_]:= FromDigits[Reverse[IntegerDigits[repunit[n]^repunit[n]]][[1 ;; n]]]; Table[a[n], {n, 1, 7}]
%t A173616 repunit[n_] := Sum[10^i, {i, 0, n - 1}]; a[n_] := If[(b = (1 +Floor@Log[10,aux = FromDigits@Reverse@IntegerDigits@PowerMod[repunit[n], repunit[n], 10^n]])) < n, aux*10^(n - b), aux]; Table[a[n], {n, 1, 20}] (* Suggested by Jorge Jimenez Meana *) (* _José María Grau Ribas_, Mar 01 2010 *)
%K A173616 base,easy,nonn
%O A173616 1,2
%A A173616 _José María Grau Ribas_, Feb 22 2010