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 A297420 #46 Mar 21 2024 14:25:03
%S A297420 0,1,1,1,4,1,4,1,25,4,4,1,25,1,4,1,196,1,25,1,25,4,4,1,225,4,4,25,16,
%T A297420 1,16,1,2601,1,4,1,196,1,4,4,196,1,36,1,16,4,4,1,2704,4,25,1,25,1,225,
%U A297420 4,169,4,4,1,169,1,4,16,71289,1,16,1,25,1,16,1,2500
%N A297420 Square of the number of groups of order n.
%C A297420 The record values are 1, 4, 25, 196, 225, 2601, 2704, 71289, 5419584, 3146312464, 110128506489369, 2448999521196387209521, etc. (A046058)
%H A297420 Vincenzo Librandi, <a href="/A297420/b297420.txt">Table of n, a(n) for n = 0..2047</a> [a(1024) corrected by Andrey Zabolotskiy]
%F A297420 a(n) = A000001(n)^2.
%p A297420 with(GroupTheory): 0,seq(NumGroups(n)^2, n=1..100); # _Muniru A Asiru_, Jan 29 2018
%t A297420 Join[{0}, FiniteGroupCount[Range[200]]^2]
%o A297420 (Magma) D:=SmallGroupDatabase(); [0] cat [ NumberOfSmallGroups(D, n)^2 : n in [1..100] ];
%o A297420 (GAP) Concatenation([0], List([1..100], n -> NumberSmallGroups(n)^2)); # _Muniru A Asiru_, Jan 29 2018
%Y A297420 Cf. A000001, A000679, A140987, A141323, A235388, A282460.
%K A297420 nonn,less
%O A297420 0,5
%A A297420 _Vincenzo Librandi_, Dec 31 2017
%E A297420 Name clarified by _Jon E. Schoenfield_, May 24 2019