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 A147662 #14 Nov 01 2022 07:13:08
%S A147662 1,2,3,16,25,216,343,4096,19683,100000,161051,2985984,4826809,
%T A147662 105413504,170859375,4294967296,6975757441,198359290368,322687697779,
%U A147662 10240000000000,16679880978201,584318301411328,952809757913927
%N A147662 Square root of largest square dividing n^n.
%C A147662 For squarefree parts see A147661.
%H A147662 Alois P. Heinz, <a href="/A147662/b147662.txt">Table of n, a(n) for n = 1..700</a>
%F A147662 a(n) = A000188(A000312(n)). - _Michel Marcus_, Nov 01 2022
%t A147662 data = Table[Sqrt[n^n], {n, 1, 200}]; sp = data /. Sqrt[_] -> 1
%o A147662 (PARI) a(n) = sqrtint(n^n/core(n^n)); \\ _Michel Marcus_, Nov 01 2022
%Y A147662 Cf. A000188, A000312, A147661.
%K A147662 nonn
%O A147662 1,2
%A A147662 _Artur Jasinski_, Nov 09 2008
%E A147662 Name edited by _Michel Marcus_, Nov 01 2022