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 A354946 #22 Jul 12 2022 13:39:45 %S A354946 1,1,1,32,1,1,1,4,1,1,1,8,1,1,9,4,17,3,19,16,7,1,1,4,1,1,1,8,1,1,1,4, %T A354946 3,17,1,768,1,1,1,4,1,1,1,8,1,1,1,4,1,125,3,16,1,9,1,4,1,1,1,8,1,1,1, %U A354946 4,5,1,1,32,9,1,1,12,1,1,5,8,1,1,1,4,1,1 %N A354946 a(n) = gcd(A001923(n),n^n). %H A354946 Michel Marcus, <a href="/A354946/b354946.txt">Table of n, a(n) for n = 1..5000</a> %t A354946 A001923[n_]:=Sum[k^k,{k,1,n}]; A[n_]:=GCD[A001923[n],n^n]; Table[A[n],{n,1,33}] %o A354946 (PARI) a(n) = gcd(sum(k=1, n, k^k), n^n); \\ _Michel Marcus_, Jul 11 2022 %Y A354946 Cf. A000312, A001923. %K A354946 nonn %O A354946 1,4 %A A354946 _José María Grau Ribas_, Jun 12 2022